home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / mail / mh / updates / MH.6.8.3.Z / MH.6.8.3
Encoding:
Text File  |  1993-11-29  |  120.4 KB  |  4,881 lines
  1. *** ../mh-6.8.2/Patchlevel    Wed Aug 25 15:56:06 1993
  2. --- Patchlevel    Tue Nov 30 13:21:56 1993
  3. ***************
  4. *** 1 ****
  5. ! MH.6.8 patch.2
  6. --- 1 ----
  7. ! MH.6.8 patch.3
  8. *** ../mh-6.8.2/conf/config/config.c    Wed Aug 25 16:00:37 1993
  9. --- conf/config/config.c    Wed Sep  1 15:29:18 1993
  10. ***************
  11. *** 1,6 ****
  12.   /* config.c - master MH configuration file */
  13.   #ifndef    lint
  14. ! static char ident[] = "@(#)$Id: config.c,v 1.9 1992/11/05 16:59:39 jromine Exp $";
  15.   #endif    /* lint */
  16.   
  17.   /* @(MHWARNING) */
  18. --- 1,6 ----
  19.   /* config.c - master MH configuration file */
  20.   #ifndef    lint
  21. ! static char ident[] = "@(#)$Id: config.c,v 1.11 1993/09/01 22:29:10 jromine Exp $";
  22.   #endif    /* lint */
  23.   
  24.   /* @(MHWARNING) */
  25. ***************
  26. *** 125,130 ****
  27. --- 125,131 ----
  28.   char   *rcvdistcomps = "rcvdistcomps";
  29.   char   *replcomps = "replcomps";
  30.   char   *usequence = "Unseen-Sequence";
  31. + char   *mhlibdir = "@(MHETCPATH)";    /* NB: this will change */
  32.   
  33.   
  34.   /* 
  35. *** ../mh-6.8.2/conf/config/mts.c    Wed Aug 25 16:00:36 1993
  36. --- conf/config/mts.c    Wed Sep  1 13:57:16 1993
  37. ***************
  38. *** 1,6 ****
  39.   /* mts.c - definitions for the mail transport system */
  40.   #ifndef    lint
  41. ! static char ident[] = "@(#)$Id: mts.c,v 2.18 1993/08/19 23:36:12 jromine Exp $";
  42.   #endif /* lint */
  43.   
  44.   /* LINTLIBRARY */
  45. --- 1,6 ----
  46.   /* mts.c - definitions for the mail transport system */
  47.   #ifndef    lint
  48. ! static char ident[] = "@(#)$Id: mts.c,v 2.19 1993/09/01 20:55:38 jromine Exp jromine $";
  49.   #endif /* lint */
  50.   
  51.   /* LINTLIBRARY */
  52. ***************
  53. *** 125,130 ****
  54. --- 125,131 ----
  55.   
  56.   /* SMTP/POP stuff */
  57.   
  58. + char   *clientname = "";
  59.   char   *servers = "localhost \01localnet";
  60.   char   *pophost = "";
  61.   
  62. ***************
  63. *** 201,206 ****
  64. --- 202,208 ----
  65.       "sendmail", &sendmail,
  66.   #endif /* SENDMTS */
  67.   
  68. +     "clientname",  &clientname,
  69.       "servers", &servers,
  70.       "pophost", &pophost,
  71.   
  72. *** ../mh-6.8.2/conf/doc/folder.rf    Wed Aug 25 16:00:28 1993
  73. --- conf/doc/folder.rf    Fri Aug 27 11:13:56 1993
  74. ***************
  75. *** 1,3 ****
  76.   .\"    @(MHWARNING)
  77. ! .\" @(#)$Id: folder.rf,v 1.12 1993/08/19 21:20:51 jromine Exp $
  78.   .SC FOLDER 1
  79. --- 1,3 ----
  80.   .\"    @(MHWARNING)
  81. ! .\" @(#)$Id: folder.rf,v 1.15 1993/08/27 18:13:47 jromine Exp $
  82.   .SC FOLDER 1
  83. ***************
  84. *** 9,10 ****
  85. --- 9,11 ----
  86.   \%[\-all]
  87. + \%[\-create] \%[\-nocreate]
  88.   \%[\-print]
  89. ***************
  90. *** 43,50 ****
  91.   become the current folder and/or message.
  92. - If the specified (or default) folder doesn't exist,
  93. - the user will be queried as to whether the folder should be created.
  94. - When standard input is not a tty, the folder is
  95. - created without any query.
  96. - (This is the easy way to create an empty folder for use later.)
  97. - 
  98.   By comparison,
  99. --- 44,45 ----
  100. ***************
  101. *** 55,56 ****
  102. --- 50,63 ----
  103.   
  104. + If the specified (or default) folder doesn't exist,
  105. + the default action is to query the user
  106. + as to whether the folder should be created;
  107. + when standard input is not a tty, the answer to 
  108. + the query is assumed to be \*(lqyes\*(rq.
  109. + 
  110. + Specifying `\-create' will cause \fIfolder\fP to create
  111. + new folders without any query.
  112. + (This is the easy way to create an empty folder for use later.)
  113. + Specifying `\-nocreate' will 
  114. + cause \fIfolder\fP to exit without creating a non-existant folder.
  115. + .\"
  116.   .\" note - this doesn't work at present
  117. ***************
  118. *** 60,62 ****
  119.   .\" but the folder summary will not be printed.
  120. - 
  121.   .Uh "Multiple Folders"
  122. --- 67,68 ----
  123. ***************
  124. *** 199,200 ****
  125. --- 205,210 ----
  126.   `\-all' forces `\-header' and `\-total'.
  127. + .sp
  128. + There is no way to restore the default behavior 
  129. + (to ask the user whether to create a non-existant folder)
  130. + after `\-create' or `\-nocreate' is given.
  131.   .En
  132. *** ../mh-6.8.2/conf/doc/mh-chart.rf    Wed Aug 25 16:00:24 1993
  133. --- conf/doc/mh-chart.rf    Tue Oct 26 13:12:49 1993
  134. ***************
  135. *** 1,3 ****
  136.   .\"    @(MHWARNING)
  137. ! .\" @(#)$Id: mh-chart.rf,v 2.19 1993/08/20 17:13:30 jromine Exp $
  138.   .if '\*(ZZ'-man' \{\
  139. --- 1,3 ----
  140.   .\"    @(MHWARNING)
  141. ! .\" @(#)$Id: mh-chart.rf,v 2.25 1993/10/26 20:12:45 jromine Exp $
  142.   .if '\*(ZZ'-man' \{\
  143. ***************
  144. *** 238,241 ****
  145.   mhn
  146. ! \%[+folder] \%[msgs] \%[\-part\0number]... \%[\-type\0content]...
  147.   .br
  148.   \%[\-list\0\%[\-headers]\0\%[\-noheaders]
  149. --- 238,243 ----
  150.   mhn
  151. ! \%[\%[+folder] \%[msgs] | \%[\-file\0file]]
  152.   .br
  153. + \%[\-part\0number]... \%[\-type\0content]...
  154. + .br
  155.   \%[\-list\0\%[\-headers]\0\%[\-noheaders]
  156. ***************
  157. *** 250,256 ****
  158.   .br
  159. ! \%[\-cache\0policy]
  160.   \%[\-check]\0\%[\-nocheck]
  161.   \%[\-ebcdicsafe]\0\%[\-noebcdicsafe]
  162.   \%[\-rfc934mode]\0\%[\-norfc934mode]
  163.   \%[\-verbose]\0\%[\-noverbose]
  164.   \%[\-help]
  165. --- 252,263 ----
  166.   .br
  167. ! \%[\-cache] \%[\-nocache] \%[\-rcache\0policy] \%[\-wcache\0policy]
  168. ! .br
  169.   \%[\-check]\0\%[\-nocheck]
  170. + .br
  171.   \%[\-ebcdicsafe]\0\%[\-noebcdicsafe]
  172. + .br
  173.   \%[\-rfc934mode]\0\%[\-norfc934mode]
  174. + .br
  175.   \%[\-verbose]\0\%[\-noverbose]
  176. + .br
  177.   \%[\-help]
  178. *** ../mh-6.8.2/conf/doc/mh-tailor.rf    Wed Aug 25 16:00:26 1993
  179. --- conf/doc/mh-tailor.rf    Tue Nov 30 14:06:47 1993
  180. ***************
  181. *** 1,3 ****
  182.   .\"    @(MHWARNING)
  183. ! .\" @(#)$Id: mh-tailor.rf,v 2.19 1992/12/02 22:16:12 jromine Exp $
  184.   .SC MH-TAILOR 5
  185. --- 1,3 ----
  186.   .\"    @(MHWARNING)
  187. ! .\" @(#)$Id: mh-tailor.rf,v 2.20 1993/09/01 21:20:56 jromine Exp $
  188.   .SC MH-TAILOR 5
  189. ***************
  190. *** 29,31 ****
  191.   This has no equivalent in the \fIMH\fR configuration file.
  192. ! POP client hosts have this value set to the name of the POP service host.
  193.   
  194. --- 29,31 ----
  195.   This has no equivalent in the \fIMH\fR configuration file.
  196. ! POP client hosts should set this value to the name of the POP service host.
  197.   
  198. ***************
  199. *** 43,44 ****
  200. --- 43,59 ----
  201.   .ti -.5i
  202. + clientname:
  203. + .br
  204. + The host name \fIMH\fP will give in the
  205. + SMTP \fBHELO\fP (and \fBEHLO\fP) command, when posting mail.
  206. + If not set, no \fBHELO\fP command will be given.
  207. + Although the \fBHELO\fP command is required by RFC 821, 
  208. + many SMTP servers do not require it.
  209. + .sp
  210. + Early versions of SendMail will fail if the host name
  211. + given in the \fBHELO\fP command is the local host; 
  212. + later versions of SendMail will complain if you omit the
  213. + \fBHELO\fP command.  If you run SendMail, find out what
  214. + your system expects and set this field accordingly.
  215. + 
  216. + .ti -.5i
  217.   systemname:
  218. ***************
  219. *** 338,339 ****
  220. --- 353,355 ----
  221.   .in -.5i
  222. + .if n .ne 8
  223.   .Uh "BBoards & The NNTP"
  224. *** ../mh-6.8.2/conf/doc/mhn.rf    Wed Aug 25 16:00:13 1993
  225. --- conf/doc/mhn.rf    Tue Oct 26 13:13:03 1993
  226. ***************
  227. *** 1,3 ****
  228.   .\"    @(MHWARNING)
  229. ! .\" @(#)$Id: mhn.rf,v 1.9 1993/08/20 15:42:08 jromine Exp $
  230.   .SC MHN 1
  231. --- 1,3 ----
  232.   .\"    @(MHWARNING)
  233. ! .\" @(#)$Id: mhn.rf,v 1.14 1993/10/26 20:12:56 jromine Exp $
  234.   .SC MHN 1
  235. ***************
  236. *** 7,10 ****
  237.   mhn
  238. ! \%[+folder] \%[msgs] \%[\-part\0number]... \%[\-type\0content]...
  239.   .br
  240.   \%[\-list\0\%[\-headers]\0\%[\-noheaders]
  241. --- 7,12 ----
  242.   mhn
  243. ! \%[\%[+folder] \%[msgs] | \%[\-file\0file]]
  244.   .br
  245. + \%[\-part\0number]... \%[\-type\0content]...
  246. + .br
  247.   \%[\-list\0\%[\-headers]\0\%[\-noheaders]
  248. ***************
  249. *** 19,21 ****
  250.   .br
  251. ! \%[\-cache\0policy]
  252.   .br
  253. --- 21,23 ----
  254.   .br
  255. ! \%[\-cache] \%[\-nocache] \%[\-rcache\0policy] \%[\-wcache\0policy]
  256.   .br
  257. ***************
  258. *** 32,37 ****
  259.   The \fImhn\fR command manipulates multi-media messages as specified in
  260. ! RFC 1341.
  261.   
  262. ! Three action switches direct the operation of \fImhn\fR,
  263. ! namely `\-list', `\-show', and `\-store'.
  264.   Any of these switches may be used concurrently.
  265. --- 34,39 ----
  266.   The \fImhn\fR command manipulates multi-media messages as specified in
  267. ! RFC 1521.
  268.   
  269. ! Four action switches direct the operation of \fImhn\fR,
  270. ! namely `\-list', `\-show', `\-store', and `-cache'.
  271.   Any of these switches may be used concurrently.
  272. ***************
  273. *** 58,60 ****
  274.   The initial list of \*(lqstandard\*(rq content types and subtypes can be found
  275. ! in RFC 1341.
  276.   .ne 18
  277. --- 60,62 ----
  278.   The initial list of \*(lqstandard\*(rq content types and subtypes can be found
  279. ! in RFC 1521.
  280.   .ne 18
  281. ***************
  282. *** 67,69 ****
  283.   ----    --------
  284. ! text    plain, richtext
  285.   multipart    mixed, alternative, digest, parallel
  286. --- 69,71 ----
  287.   ----    --------
  288. ! text    plain
  289.   multipart    mixed, alternative, digest, parallel
  290. ***************
  291. *** 90,92 ****
  292.   Note that regardless of the values given to the `\-type' switch,
  293. ! a multipart content is always acted upon.
  294.   Further note that if the `\-type' switch is used,
  295. --- 92,94 ----
  296.   Note that regardless of the values given to the `\-type' switch,
  297. ! a multipart content (of any subtype listed above) is always acted upon.
  298.   Further note that if the `\-type' switch is used,
  299. ***************
  300. *** 100,101 ****
  301. --- 102,112 ----
  302.   
  303. + The option `\-file\ file' directs \fImhn\fR to use the specified
  304. + file as the source message, rather than a message from
  305. + a folder.
  306. + Note that the file should be a validly formatted message,
  307. + just like any other \fIMH\fR message.
  308. + It should \fBNOT\fR be in mail drop format
  309. + (to convert a file in mail drop format to a folder of \fIMH\fR messages,
  310. + see \fIinc\fR\0(1)).
  311. + 
  312.   .Uh "Listing the Contents"
  313. ***************
  314. *** 134,135 ****
  315. --- 145,147 ----
  316.   %s    subtype
  317. + %d    content description
  318.   .re
  319. ***************
  320. *** 152,153 ****
  321. --- 164,172 ----
  322.   
  323. + Note that if the content being displayed is multipart,
  324. + but not one of the subtypes listed above,
  325. + then the f- and F-escapes expand to multiple filenames,
  326. + one for each subordinate content.
  327. + Further,
  328. + stdin is not redirected from the terminal to the content.
  329. + 
  330.   First,
  331. ***************
  332. *** 262,264 ****
  333.   current message have terminated.
  334. ! In the case of a multipart content,
  335.   the content contains advice indicating if the parts should be
  336. --- 281,283 ----
  337.   current message have terminated.
  338. ! In the case of a multipart content (of any subtype listed above),
  339.   the content contains advice indicating if the parts should be
  340. ***************
  341. *** 278,279 ****
  342. --- 297,299 ----
  343.   profile entry,
  344. + .ne 6
  345.   e.g.,
  346. ***************
  347. *** 304,306 ****
  348.   .sp
  349. ! If the content isn't part of a multipart content,
  350.   the p-escapes are ignored.
  351. --- 324,326 ----
  352.   .sp
  353. ! If the content isn't part of a multipart (of any subtype listed above) content,
  354.   the p-escapes are ignored.
  355. ***************
  356. *** 405,407 ****
  357.   .sp
  358. ! If your system supports a SOCKETs interface to TCP/IP,
  359.   then \fImhn\fR will use a built-in FTP client.
  360. --- 425,428 ----
  361.   .sp
  362. ! For the \*(lqanon-ftp\*(rq and \*(lqftp\*(rq access types,
  363. ! if your system supports a SOCKETs interface to TCP/IP,
  364.   then \fImhn\fR will use a built-in FTP client.
  365. ***************
  366. *** 409,410 ****
  367. --- 430,432 ----
  368.   \fImhn\fR will look for the \fBmhn-access-ftp\fR profile entry,
  369. + .ne 6
  370.   e.g.,
  371. ***************
  372. *** 432,434 ****
  373.   The program should terminate with a zero-valued exit-status if the
  374. ! retrieval is success.
  375.   
  376. --- 454,456 ----
  377.   The program should terminate with a zero-valued exit-status if the
  378. ! retrieval is successful.
  379.   
  380. ***************
  381. *** 438,448 ****
  382.   and if the content allows caching,
  383. ! then \fImhn\fR looks for the profile entry \fBmhn-cache\fR to
  384. ! determine if the content should be read from/written to a cache.
  385. ! Any content written to the cache will,
  386. ! by default,
  387. ! be world-readable.
  388. ! (To prevent this,
  389. ! use a directory name with the desired read and execute permissions.)
  390. ! The \fBmhn-cache\fR profile entry names the directory used for caching,
  391. ! e.g.,
  392.   .sp
  393. --- 460,491 ----
  394.   and if the content allows caching,
  395. ! then depending on the caching behavior of \fImhn\fR,
  396. ! the content might be read from or written to a cache.
  397. ! 
  398. ! The caching behavior of \fImhn\fR is controlled with
  399. ! the `\-rcache' and `\-wcache' switches,
  400. ! which define the policy for reading from,
  401. ! and writing to,
  402. ! the cache, respectively.
  403. ! One of four policies may be specified:
  404. ! \*(lqpublic\*(rq,
  405. ! indicating that \fImhn\fR should make use of a
  406. ! publically-accessible content cache;
  407. ! \*(lqprivate\*(rq,
  408. ! indicating that \fImhn\fR should make use of the user's
  409. ! private content cache;
  410. ! \*(lqnever\*(rq,
  411. ! indicating that \fImhn\fR should never make use of caching;
  412. ! and,
  413. ! \*(lqask\*(rq,
  414. ! indicating that \fImhn\fR should ask the user.
  415. ! 
  416. ! There are two directories where contents may be cached:
  417. ! the profile entry \fBmhn-cache\fR names a directory containing
  418. ! world-readable contents,
  419. ! and,
  420. ! the profile entry \fBmhn-private-cache\fR names a directory containing
  421. ! private contents.
  422. ! The former should be an absolute (rooted) directory name.
  423. ! .ne 6
  424. ! For example,
  425.   .sp
  426. ***************
  427. *** 454,463 ****
  428.   of the system.
  429.   
  430. ! The caching behavior of \fImhn\fR is controlled with the `\-cache' switch.
  431. ! One of three arguments may be specified:
  432. ! always, indicating that \fImhn\fR should make use of caching whenever possible;
  433. ! ask, indicating that \fImhn\fR should ask the user;
  434. ! and,
  435. ! never, indicating that \fImhn\fR should never make use of caching.
  436.   
  437.   .Uh "Composing the Contents"
  438. --- 497,561 ----
  439.   of the system.
  440. + The latter is interpreted relative to the user's MH directory,
  441. + if not rooted,
  442. + .ne 6
  443. + e.g.,
  444. + .sp
  445. + .in +.5i
  446. + mhn-private-cache: .cache
  447. + .in -.5i
  448. + .sp
  449. + (which is the default value).
  450.   
  451. ! .Uh "Caching the Contents"
  452. ! When you encounter a content of type message/external-body with access type
  453. ! \*(lqmail-server\*(rq,
  454. ! \fImhn\fR will ask you if may send a message to a mail-server
  455. ! requesting the content,
  456. ! .ne 14
  457. ! e.g.,
  458. ! .sp
  459. ! .nf
  460. ! .in +.5i
  461. ! % show 1
  462. ! Retrieve content by asking mail-server@...
  463.   
  464. + SEND file
  465. + 
  466. + ? yes
  467. + mhn: request sent
  468. + .in -.5i
  469. + .fi
  470. + .sp
  471. + Regardless of your decision,
  472. + \fImhn\fR can't perform any other processing on the content.
  473. + 
  474. + However,
  475. + if \fImhn\fR is allowed to request the content,
  476. + then when it arrives,
  477. + there should be a top-level \*(lqContent-ID:\*(rq field which
  478. + corresponds to the value in the original message/external-body content.
  479. + You should now use the `-cache' switch to tell \fImhn\fR to enter the
  480. + arriving content into the content cache,
  481. + .ne 8
  482. + e.g.,
  483. + .sp
  484. + .nf
  485. + .in +.5i
  486. + % mhn -cache 2
  487. + caching message 2 as file ...
  488. + .in -.5i
  489. + .fi
  490. + .sp
  491. + You can then re-process the original message/external-body content,
  492. + and \*(lqthe right thing should happen\*(rq,
  493. + .ne 8
  494. + e.g.,
  495. + .sp
  496. + .nf
  497. + .in +.5i
  498. + % show 1
  499. + \0...
  500. + .in -.5i
  501. + .fi
  502. + 
  503.   .Uh "Composing the Contents"
  504. ***************
  505. *** 469,471 ****
  506.   
  507. ! .ne 54
  508.   The syntax of this is straight-forward:
  509. --- 567,569 ----
  510.   
  511. ! .ne 59
  512.   The syntax of this is straight-forward:
  513. ***************
  514. *** 481,482 ****
  515. --- 579,581 ----
  516.                               [ "(" comment ")" ]
  517. +                             [ "<" id ">" ]
  518.                               [ "[" description "]" ]
  519. ***************
  520. *** 488,489 ****
  521. --- 587,589 ----
  522.                               [ "(" comment ")" ]
  523. +                             [ "<" id ">" ]
  524.                               [ "[" description "]" ]
  525. ***************
  526. *** 493,494 ****
  527. --- 593,595 ----
  528.                         | "#forw"
  529. +                             [ "<" id ">" ]
  530.                               [ "[" description "]" ]
  531. ***************
  532. *** 498,499 ****
  533. --- 599,601 ----
  534.                         | "#begin"
  535. +                               [ "<" id ">" ]
  536.                                 [ "[" description "]" ]
  537. ***************
  538. *** 500,502 ****
  539.                                 [   "alternative"
  540. !                                 | "parallel"    ]
  541.                                 EOL
  542. --- 602,605 ----
  543.                                 [   "alternative"
  544. !                                 | "parallel"
  545. !                                 | something-else    ]
  546.                                 EOL
  547. ***************
  548. *** 539,541 ****
  549.       type=tar; \\
  550. !     conversions=x-compress
  551.   .in -.5i
  552. --- 642,644 ----
  553.       type=tar; \\
  554. !     x-conversions=compress
  555.   .in -.5i
  556. ***************
  557. *** 624,626 ****
  558.       type=tar; \\
  559. !     conversions=x-compress [] \\
  560.       access-type=anon-ftp; \\
  561. --- 727,729 ----
  562.       type=tar; \\
  563. !     x-conversions=compress [] \\
  564.       access-type=anon-ftp; \\
  565. ***************
  566. *** 635,637 ****
  567.   and the start of the external-parameters is identified.
  568. ! .ne 16
  569.   These parameters are of the form:
  570. --- 738,740 ----
  571.   and the start of the external-parameters is identified.
  572. ! .ne 19
  573.   These parameters are of the form:
  574. ***************
  575. *** 685,686 ****
  576. --- 788,794 ----
  577.   the \*(lq[\*(rq character and the \*(lq]\*(rq character.
  578. + By default,
  579. + \fImhn\fR will generate a unique \*(lqContent-ID:\*(rq for each directive;
  580. + however,
  581. + the user may override this by defining the ID using the
  582. + \*(lq<\*(rq and \*(lq>\*(rq characters.
  583.   Putting this all together,
  584. ***************
  585. *** 713,714 ****
  586. --- 821,823 ----
  587.   simply double it,
  588. + .ne 6
  589.   e.g.,
  590. ***************
  591. *** 875,876 ****
  592. --- 984,986 ----
  593.   then it is interpreted as the number of seconds to pause in between postings,
  594. + .ne 6
  595.   e.g.,
  596. ***************
  597. *** 908,910 ****
  598.                type=tar
  599. !              conversions=x-compress
  600.   % mhn -show last
  601. --- 1018,1020 ----
  602.                type=tar
  603. !              x-conversions=compress
  604.   % mhn -show last
  605. ***************
  606. *** 938,940 ****
  607.                type=tar
  608. !              conversions=x-compress
  609.   % mhn -show last
  610. --- 1048,1050 ----
  611.                type=tar
  612. !              x-conversions=compress
  613.   % mhn -show last
  614. ***************
  615. *** 978,979 ****
  616. --- 1088,1090 ----
  617.   \fImhn\fR will attempt to consult one other additional user profile,
  618. + .ne 6
  619.   e.g.,
  620. ***************
  621. *** 999,1001 ****
  622.   .Ps
  623. ! ^mhn-cache~^Directory to store cached external contents
  624.   .Ps
  625. --- 1110,1112 ----
  626.   .Ps
  627. ! ^mhn-cache~^Public directory to store cached external contents
  628.   .Ps
  629. ***************
  630. *** 1005,1006 ****
  631. --- 1116,1119 ----
  632.   .Ps
  633. + ^mhn-private-cache~^Personal directory to store cached external contents
  634. + .Ps
  635.   ^mhn-show-<type>*~^Template for displaying contents
  636. ***************
  637. *** 1017,1019 ****
  638.   Internet Message Bodies\fR
  639. ! (RFC 1341),
  640.   .br
  641. --- 1130,1132 ----
  642.   Internet Message Bodies\fR
  643. ! (RFC 1521),
  644.   .br
  645. ***************
  646. *** 1024,1025 ****
  647. --- 1137,1140 ----
  648.   .Ds
  649. + `msgs' defaults to cur
  650. + .Ds
  651.   `\-noauto'
  652. ***************
  653. *** 1026,1028 ****
  654.   .Ds
  655. ! `\-cache\0ask'
  656.   .Ds
  657. --- 1141,1143 ----
  658.   .Ds
  659. ! `\-nocache'
  660.   .Ds
  661. ***************
  662. *** 1038,1039 ****
  663. --- 1153,1156 ----
  664.   .Ds
  665. + `\-rcache\0ask'
  666. + .Ds
  667.   `\-realsize'
  668. ***************
  669. *** 1047,1048 ****
  670. --- 1164,1167 ----
  671.   `\-noverbose'
  672. + .Ds
  673. + `\-wcache\0ask'
  674.   .Co
  675. *** ../mh-6.8.2/conf/doc/show.rf    Wed Aug 25 16:00:15 1993
  676. --- conf/doc/show.rf    Tue Oct 26 13:09:12 1993
  677. ***************
  678. *** 1,3 ****
  679.   .\"    @(MHWARNING)
  680. ! .\" @(#)$Id: show.rf,v 1.7 1992/05/19 21:57:39 jromine Exp $
  681.   .SC SHOW 1
  682. --- 1,3 ----
  683.   .\"    @(MHWARNING)
  684. ! .\" @(#)$Id: show.rf,v 1.8 1993/10/26 20:09:07 jromine Exp $
  685.   .SC SHOW 1
  686. ***************
  687. *** 35,42 ****
  688.   
  689. ! If you have messages with multi-media content,
  690. ! you should define the profile entry \fImhnproc\fR,
  691. ! which is the name of a program to manipulate multi-media messages.
  692. ! The \fImhn\fR\0(1) program is suitable for this purpose.
  693. ! Note that if the \fImhnproc\fR profile entry is defined,
  694. ! the `\-noshowproc' option is NOT specified,
  695.   and if one or more named messages has a multi-media content,
  696. --- 35,43 ----
  697.   
  698. ! If you have messages with multi-media contents,
  699. ! the profile entry \fImhnproc\fR defines the name of a program to
  700. ! manipulate multi-media messages.
  701. ! (The \fImhn\fR\0(1) program,
  702. ! which is suitable for this purpose,
  703. ! is the default.)
  704. ! If the `\-noshowproc' option is NOT specified,
  705.   and if one or more named messages has a multi-media content,
  706. ***************
  707. *** 46,47 ****
  708. --- 47,52 ----
  709.   environment variable \fB$NOMHNPROC\fR is set.
  710. + Note that the \fImhnproc\fR may be invoked even for textual contents,
  711. + depending on the character set involved.
  712. + The environment variable $MM_CHARSET should be set to the terminal's
  713. + character set to avoid gratuitous invocations of the \fImhnproc\fR.
  714.   @END: MIME
  715. *** ../mh-6.8.2/conf/doc/sortm.rf    Wed Aug 25 16:00:15 1993
  716. --- conf/doc/sortm.rf    Fri Aug 27 13:21:30 1993
  717. ***************
  718. *** 1,3 ****
  719.   .\"    @(MHWARNING)
  720. ! .\" @(#)$Id: sortm.rf,v 1.8 90/04/05 15:15:26 sources Exp $
  721.   .SC SORTM 1
  722. --- 1,3 ----
  723.   .\"    @(MHWARNING)
  724. ! .\" @(#)$Id: sortm.rf,v 1.9 1993/08/27 20:21:19 jromine Exp $
  725.   .SC SORTM 1
  726. ***************
  727. *** 80,88 ****
  728.   
  729. ! Previously,
  730. ! \fIsortm\fR would try to fill any gaps in a folder within the
  731. ! range of messages it sorted. 
  732. ! To improve performance,
  733. ! \fIsortm\fR now minimizes the number of message moves.
  734. ! To pack a folder, use
  735. ! \*(lq\fIfolder\ \-pack\fR\|\*(rq instead.
  736.   .Bu
  737. --- 80,88 ----
  738.   
  739. ! \fISortm\fP sometimes did not preserve the message
  740. ! numbering in a folder (e.g., messages
  741. ! 1, 3, and 5, might have been renumbered
  742. ! to 1, 2, 3 after sorting).
  743. ! This was a bug, and has been fixed.
  744. ! To compress the message numbering in a folder, use
  745. ! \*(lq\fIfolder\ \-pack\fR\|\*(rq as always.
  746.   .Bu
  747. *** ../mh-6.8.2/conf/examples/aix.sap-ag.de    Wed Aug 25 16:00:06 1993
  748. --- conf/examples/aix.sap-ag.de    Thu Sep  2 10:56:44 1993
  749. ***************
  750. *** 15,18 ****
  751.   #
  752. ! options        TYPESIG=void SYS5 SYS5DIR SOCKETS
  753.   curses        -lcurses
  754.   sprintf        int
  755. --- 15,19 ----
  756.   #
  757. ! options        SYS5 SYS5DIR SOCKETS
  758.   curses        -lcurses
  759. + signal        void
  760.   sprintf        int
  761. *** ../mh-6.8.2/conf/examples/aix31.rpi.edu    Wed Aug 25 16:00:10 1993
  762. --- conf/examples/aix31.rpi.edu    Thu Sep  2 10:56:55 1993
  763. ***************
  764. *** 25,27 ****
  765.   options    RPOP SBACKUP='"\\043"' SOCKETS SYS5 SYS5DIR 
  766. ! options    TYPESIG='void' TZNAME VSPRINTF YP_LOOKUP
  767.   options    AIX AIX3_1 ISI WP NETWORK KPOP TRANSARC_KAS
  768. --- 25,27 ----
  769.   options    RPOP SBACKUP='"\\043"' SOCKETS SYS5 SYS5DIR 
  770. ! options    TZNAME VSPRINTF YP_LOOKUP
  771.   options    AIX AIX3_1 ISI WP NETWORK KPOP TRANSARC_KAS
  772. ***************
  773. *** 35,36 ****
  774. --- 35,37 ----
  775.   sprintf    int
  776. + signal    void
  777.   sharedlib    off
  778. *** ../mh-6.8.2/conf/examples/hpux.sap-ag.de    Wed Aug 25 16:00:07 1993
  779. --- conf/examples/hpux.sap-ag.de    Thu Sep  2 10:57:05 1993
  780. ***************
  781. *** 16,19 ****
  782.   ccoptions    +DA1.0 +DS1.0
  783. ! options        TYPESIG=void SYS5 NDIR SOCKETS _STRINGS
  784.   curses        -lcurses -ltermlib
  785.   sprintf        int
  786. --- 16,20 ----
  787.   ccoptions    +DA1.0 +DS1.0
  788. ! options        SYS5 NDIR SOCKETS _STRINGS
  789.   curses        -lcurses -ltermlib
  790. + signal        void
  791.   sprintf        int
  792. *** ../mh-6.8.2/conf/examples/sun4.0    Wed Aug 25 16:00:02 1993
  793. --- conf/examples/sun4.0    Thu Sep  2 10:57:29 1993
  794. ***************
  795. *** 10,12 ****
  796.   mts    sendmail/smtp
  797. ! options    BSD42 BSD43 SUN40 TYPESIG=void
  798.   options    DBMPWD
  799. --- 10,12 ----
  800.   mts    sendmail/smtp
  801. ! options    BSD42 BSD43 SUN40 
  802.   options    DBMPWD
  803. ***************
  804. *** 13,14 ****
  805. --- 13,15 ----
  806.   options BIND
  807. + signal    void
  808.   curses    -lcurses -ltermcap
  809. *** ../mh-6.8.2/conf/examples/sun4.1.1    Wed Aug 25 16:00:06 1993
  810. --- conf/examples/sun4.1.1    Thu Sep  2 10:57:37 1993
  811. ***************
  812. *** 11,13 ****
  813.   options    ATTVIBUG BIND BSD42 BSD43 DBMPWD
  814. ! options    LOCKF SUN40 SUN41 TYPESIG=void ZONEINFO
  815.   curses    -lcurses -ltermcap
  816. --- 11,14 ----
  817.   options    ATTVIBUG BIND BSD42 BSD43 DBMPWD
  818. ! options    LOCKF SUN40 SUN41 ZONEINFO
  819. ! signal    void
  820.   curses    -lcurses -ltermcap
  821. *** ../mh-6.8.2/conf/examples/sun411.rpi.edu    Wed Aug 25 16:00:01 1993
  822. --- conf/examples/sun411.rpi.edu    Thu Sep  2 10:57:47 1993
  823. ***************
  824. *** 24,26 ****
  825.   options    RPOP KPOP TRANSARC_KAS SBACKUP='"\\043"' 
  826. ! options    SUN40 SUN41 TYPESIG='void' TZNAME ZONEINFO 
  827.   options    ISI WP YP_LOOKUP
  828. --- 24,26 ----
  829.   options    RPOP KPOP TRANSARC_KAS SBACKUP='"\\043"' 
  830. ! options    SUN40 SUN41 TZNAME ZONEINFO 
  831.   options    ISI WP YP_LOOKUP
  832. ***************
  833. *** 33,34 ****
  834. --- 33,35 ----
  835.   sprintf    int
  836. + signal    void
  837.   ranlib    on
  838. *** ../mh-6.8.2/conf/examples/ultrix.sap-ag.de    Wed Aug 25 16:00:07 1993
  839. --- conf/examples/ultrix.sap-ag.de    Thu Sep  2 10:56:05 1993
  840. ***************
  841. *** 15,18 ****
  842.   #
  843. ! options        TYPESIG=void BSD42 BSD43
  844.   curses        -lcurses -ltermlib
  845.   #
  846. --- 15,19 ----
  847.   #
  848. ! options        BSD42 BSD43
  849.   curses        -lcurses -ltermlib
  850. + signal        void
  851.   #
  852. *** ../mh-6.8.2/conf/makefiles/MH-Makefile    Wed Aug 25 15:59:51 1993
  853. --- conf/makefiles/MH-Makefile    Fri Aug 27 15:15:52 1993
  854. ***************
  855. *** 4,6 ****
  856.   #    @(MHWARNING)
  857. ! # @(#)$Id: MH-Makefile,v 2.15 1992/12/03 16:23:40 jromine Exp $
  858.   ##############################################################################
  859. --- 4,6 ----
  860.   #    @(MHWARNING)
  861. ! # @(#)$Id: MH-Makefile,v 2.16 1993/08/27 22:15:49 jromine Exp $
  862.   ##############################################################################
  863. ***************
  864. *** 65,66 ****
  865. --- 65,67 ----
  866.   ETCDIR    =    $(DESTDIR)@(MHETCPATH)
  867. + MANDIR    =    $(DESTDIR)@(MHMANDIR)
  868.   SLIB    =    sbr
  869. ***************
  870. *** 74,80 ****
  871.   
  872. ! mkdirs:        $(BINDIR) $(ETCDIR)
  873.   
  874. ! $(BINDIR) $(ETCDIR):
  875. !         mkdir $@
  876. !         chmod 0755 $@
  877.   
  878. --- 75,80 ----
  879.   
  880. ! mkdirs:        $(BINDIR) $(ETCDIR) $(MANDIR)
  881.   
  882. ! $(BINDIR) $(ETCDIR) $(MANDIR):
  883. !         mkdir $@ && chmod 0755 $@
  884.   
  885. *** ../mh-6.8.2/conf/makefiles/doc    Wed Aug 25 15:59:54 1993
  886. --- conf/makefiles/doc    Fri Aug 27 15:16:03 1993
  887. ***************
  888. *** 4,6 ****
  889.   #    @(MHWARNING)
  890. ! # @(#)$Id: doc,v 2.25 1993/06/03 17:43:20 jromine Exp $
  891.   ##############################################################################
  892. --- 4,6 ----
  893.   #    @(MHWARNING)
  894. ! # @(#)$Id: doc,v 2.26 1993/08/27 22:15:57 jromine Exp $
  895.   ##############################################################################
  896. ***************
  897. *** 147,149 ****
  898.   
  899. ! inst-all:    @(MHMANGEN) inst-tmac $(inst-man1) $(inst-man5) $(inst-man8)
  900.   
  901. --- 147,150 ----
  902.   
  903. ! inst-all:    @(MHMANGEN) mkdirs inst-tmac \
  904. !             $(inst-man1) $(inst-man5) $(inst-man8)
  905.   
  906. ***************
  907. *** 175,176 ****
  908. --- 176,183 ----
  909.   ##############################################################################
  910. + 
  911. + mkdirs:        $(MANDIR)/$(DIR1) $(MANDIR)/$(DIR5) $(MANDIR)/$(DIR8)
  912. + 
  913. + $(MANDIR)/$(DIR1) $(MANDIR)/$(DIR5) $(MANDIR)/$(DIR8):
  914. +         -mkdir $@ && chmod 0755 $@
  915. + 
  916.   
  917. *** ../mh-6.8.2/conf/makefiles/zotnet/tws    Wed Aug 25 15:59:55 1993
  918. --- conf/makefiles/zotnet/tws    Sat Sep  4 12:32:39 1993
  919. ***************
  920. *** 4,6 ****
  921.   #    @(MHWARNING)
  922. ! # @(#)$Id: tws,v 1.16 1993/02/26 21:50:51 jromine Exp $
  923.   ##############################################################################
  924. --- 4,6 ----
  925.   #    @(MHWARNING)
  926. ! # @(#)$Id: tws,v 1.16 1993/02/26 21:50:51 jromine Exp jromine $
  927.   ##############################################################################
  928. ***************
  929. *** 73,76 ****
  930.           $(LEX) dtimep.lex | sed -f lexedit.sed > dtimep.c
  931. !         len=`wc -l dtimep.c | awk ' { print $$1 } '`; \
  932. !             if [ $$len -eq 1 ]; then cp dtimep.c-lexed dtimep.c; fi
  933.   
  934. --- 73,80 ----
  935.           $(LEX) dtimep.lex | sed -f lexedit.sed > dtimep.c
  936. !         -@len=`wc -l dtimep.c | awk ' { print $$1 } '`; \
  937. !         if [ $$len -gt 10 ]; \
  938. !         then exit 0; \
  939. !         else echo "lex failed: using pre-lexed dtimep.c"; \
  940. !             cp dtimep.c-lexed dtimep.c; \
  941. !         fi
  942.   
  943. *** ../mh-6.8.2/conf/mh-gen.8    Wed Aug 25 15:59:46 1993
  944. --- conf/mh-gen.8    Tue Nov 30 16:44:29 1993
  945. ***************
  946. *** 1,2 ****
  947. ! .\" @(#)$Id: mh-gen.8,v 2.112 1993/08/25 18:07:10 jromine Exp $
  948.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  949. --- 1,2 ----
  950. ! .\" @(#)$Id: mh-gen.8,v 2.115 1993/12/01 00:44:23 jromine Exp $
  951.   .\" uneven inter-word spacing (nroff line adjusting) hampers readability
  952. ***************
  953. *** 3,5 ****
  954.   .if n .na
  955. ! .TH MH-GEN 8 MH.6.8.2 [mh.6]
  956.   .SH NAME
  957. --- 3,5 ----
  958.   .if n .na
  959. ! .TH MH-GEN 8 MH.6.8.3 [mh.6]
  960.   .SH NAME
  961. ***************
  962. *** 1161,1164 ****
  963.   to change your MH configuration.  If so, cd back to the \fBconf/\fP
  964. ! directory, re-edit the file \fBMH\fP, and re-run
  965. ! \fImhconfig\fP.
  966.   .PP
  967. --- 1161,1164 ----
  968.   to change your MH configuration.  If so, cd back to the \fBconf/\fP
  969. ! directory, re-edit the files \fBMH\fP
  970. ! and \fBconf/config/mtstailor\fR, and re-run \fImhconfig\fP.
  971.   .PP
  972. ***************
  973. *** 1343,1347 ****
  974.   .SH INSTALLATION
  975. ! If the directories you chose for the user\-programs and
  976. ! support\-programs
  977. ! (\*(lqbin\*(rq and \*(lqetc\*(rq in the \fBconf/MH\fR file)
  978.   don't exist,
  979. --- 1343,1348 ----
  980.   .SH INSTALLATION
  981. ! If the directories you chose for the user\-programs,
  982. ! support\-programs and manuals
  983. ! (\*(lqbin\*(rq, \*(lqetc\*(rq, \*(lqpopdir\*(rq, \*(lqslibdir\*(rq,
  984. ! and \*(lqmandir\*(rq in the \fBconf/MH\fR file)
  985.   don't exist,
  986. *** ../mh-6.8.2/conf/mhconfig.c    Wed Aug 25 15:59:45 1993
  987. --- conf/mhconfig.c    Tue Nov 30 14:01:08 1993
  988. ***************
  989. *** 1,7 ****
  990.   /* mhconfig.c - configure MH */
  991.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  992.   #ifndef    lint
  993. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.70 1993/08/25 18:07:10 jromine Exp $";
  994.   #endif    /* lint */
  995.   
  996.   #include <ctype.h>
  997. --- 1,7 ----
  998.   /* mhconfig.c - configure MH */
  999.   /* cc [-DSYS5] mhconfig.c -o mhconfig */
  1000.   #ifndef    lint
  1001. ! static char ident[] = "@(#)$Id: mhconfig.c,v 2.71 1993/11/30 22:01:04 jromine Exp $";
  1002.   #endif    /* lint */
  1003.   
  1004.   #include <ctype.h>
  1005. ***************
  1006. *** 29,35 ****
  1007.   #define    MAKE        "../%s/Makefile"
  1008.   
  1009.   #define    WARNING    "This file is automatically generated.  Do not edit!"
  1010. ! #define    MHRELEASE    "6.8.2"        /* for version: "Maj.min.pat" */
  1011.   #define    MHCENTERFOOT    "MH.6.8"    /* for nroff page footers */
  1012.   #define    MHLEFTFOOT    "[mh.6]"    /* [mh.6]    MH.6.6   page# */
  1013.   #define    MHSLIBVER    "3.2"        /* SunOS4 shared library version */
  1014. --- 29,35 ----
  1015.   #define    MAKE        "../%s/Makefile"
  1016.   
  1017.   #define    WARNING    "This file is automatically generated.  Do not edit!"
  1018. ! #define    MHRELEASE    "6.8.3"        /* for version: "Maj.min.pat" */
  1019.   #define    MHCENTERFOOT    "MH.6.8"    /* for nroff page footers */
  1020.   #define    MHLEFTFOOT    "[mh.6]"    /* [mh.6]    MH.6.6   page# */
  1021.   #define    MHSLIBVER    "3.2"        /* SunOS4 shared library version */
  1022. *** ../mh-6.8.2/miscellany/multi-media/READ-ME    Wed Aug 25 15:59:09 1993
  1023. --- miscellany/multi-media/READ-ME    Wed Sep  1 19:07:33 1993
  1024. ***************
  1025. *** 2,4 ****
  1026.   
  1027. ! [ READ-ME - Wed Oct 21 15:35:57 1992 - multi-media MH for MH 6.7 - /mtr ]
  1028.   
  1029. --- 2,4 ----
  1030.   
  1031. ! [ READ-ME - Wed Sep  1 19:07:25 1993 - multi-media MH - /mtr ]
  1032.   
  1033. ***************
  1034. *** 257,268 ****
  1035.        can fiddle with the volume controls whenever you like.
  1036. - 
  1037. - 
  1038. -                     video
  1039. - 
  1040. -      If you are running the X window system, you can use the mpeg_play
  1041. -      program to display a video/mpeg content.
  1042. - 
  1043. -     host    toe.cs.berkeley.edu
  1044. -     dir    pub/multimedia/mpeg/
  1045. -     file    mpeg-2.0.tar.Z
  1046. -     mode    binary
  1047. --- 257 ----
  1048. *** /dev/null    Tue Nov 30 18:53:36 1993
  1049. --- miscellany/multi-media/misc/READ-ME    Tue Nov 30 19:33:07 1993
  1050. ***************
  1051. *** 0 ****
  1052. --- 1,15 ----
  1053. + [ READ-ME - Wed Sep  1 19:08:21 1993 - miscellaneous stuff - /mtr ]
  1054. + 
  1055. + 
  1056. + mimeless
  1057. +   
  1058. +      This invokes less in a more interesting way to display text/plain
  1059. +      contents.  In your .mhn_profile, add the line
  1060. +   
  1061. +       mhn-show-text/plain: mimeless "%d" text/%s '%F'
  1062. +   
  1063. + 
  1064. + rt2raw.c
  1065. + 
  1066. +      This is a relly dumb richtext interpeter.  The compilation and
  1067. +      installation instructions are in miscellany/multi-media/READ-ME.
  1068. *** /dev/null    Tue Nov 30 18:53:36 1993
  1069. --- miscellany/multi-media/misc/mimeless    Thu Sep  2 21:31:21 1993
  1070. ***************
  1071. *** 0 ****
  1072. --- 1,19 ----
  1073. + #!/bin/sh
  1074. + : mhn-show-text/plain: mimeless "%d" text/%s '%F'
  1075. + 
  1076. + if [ $# != 3 ]; then
  1077. +   echo "usage: $0 message-1 message-2 file-name" 1>&2
  1078. +   exit 1
  1079. + fi
  1080. + 
  1081. + if [ ! -r $3 ]; then
  1082. +   echo "File does not exist." 1>&2
  1083. +   exit 1
  1084. + fi
  1085. + 
  1086. + msg1=`echo $1 | sed -e 's/\%/\\\%/g' -e 's/\?/\\\?/g' -e 's/:/\\:/g' \
  1087. +         -e 's/\./\\\./g' -e 's/\"/\\\"/g'`
  1088. + msg2=`echo $2 | sed -e 's/\%/\\\%/g' -e 's/\?/\\\?/g' -e 's/:/\\:/g' \
  1089. +         -e 's/\./\\\./g' -e 's/\"/\\\"/g'`
  1090. + 
  1091. + exec less -P"\"${msg1}\" ${msg2} ?pB%pB\%.%t" $3
  1092. *** ../mh-6.8.2/miscellany/multi-media/profiles/mhn_defaults    Wed Aug 25 15:59:11 1993
  1093. --- miscellany/multi-media/profiles/mhn_defaults    Tue Sep  7 21:05:07 1993
  1094. ***************
  1095. *** 5,7 ****
  1096.   mhn-show-application/x-ivs: %pivs_replay -o '%F'
  1097. ! mhn-show-audio/basic: %p/usr/demo/SOUND/raw2audio 2>/dev/null | play
  1098.   mhn-show-audio/x-next: %p/usr/openwin/bin/adpcm_dec | /usr/demo/SOUND/play
  1099. --- 5,7 ----
  1100.   mhn-show-application/x-ivs: %pivs_replay -o '%F'
  1101. ! mhn-show-audio/basic: %p/usr/demo/SOUND/raw2audio 2>/dev/null | /usr/demo/SOUND/play
  1102.   mhn-show-audio/x-next: %p/usr/openwin/bin/adpcm_dec | /usr/demo/SOUND/play
  1103. *** ../mh-6.8.2/miscellany/multi-media/profiles/mtr.mh_profile    Wed Aug 25 15:59:11 1993
  1104. --- miscellany/multi-media/profiles/mtr.mh_profile    Tue Sep  7 21:05:02 1993
  1105. ***************
  1106. *** 54,56 ****
  1107.   automhnproc:    mhn
  1108. ! mhnproc:    mhn
  1109.   mcomp:        -editor rapid -form comp.mhn
  1110. --- 54,56 ----
  1111.   automhnproc:    mhn
  1112. ! mhnproc:    xmhn
  1113.   mcomp:        -editor rapid -form comp.mhn
  1114. *** ../mh-6.8.2/miscellany/multi-media/profiles/mtr.mhn_profile.openwindows    Wed Aug 25 15:59:11 1993
  1115. --- miscellany/multi-media/profiles/mtr.mhn_profile.openwindows    Tue Sep  7 21:06:06 1993
  1116. ***************
  1117. *** 1,2 ****
  1118. ! mhn-show-application/PostScript: gs -q -dSAFER -- %F
  1119. ! mhn-store-message/rfc822: %m%P.msg
  1120. --- 1,4 ----
  1121. ! mhn-show-application/PostScript: gs -q -dSAFER -- '%F'
  1122. ! mhn-show-multipart/enabled-mail: %pem_play -generic %F
  1123. ! mhn-show-application/safe-tcl: %pst_play %a '%F'
  1124. ! mhn-show-text/plain: mimeless "%d" text/%s '%F'
  1125. *** ../mh-6.8.2/mts/sendmail/smail.c    Wed Aug 25 15:58:24 1993
  1126. --- mts/sendmail/smail.c    Tue Nov 30 19:50:36 1993
  1127. ***************
  1128. *** 1,6 ****
  1129.   /* smail.c - MH interface to SendMail/SMTP */
  1130.   #ifndef    lint
  1131. ! static char ident[] = "@(#)$Id: smail.c,v 1.25 1993/08/25 17:17:29 jromine Exp $";
  1132.   #endif
  1133.   
  1134.   /* LINTLIBRARY */
  1135. --- 1,6 ----
  1136.   /* smail.c - MH interface to SendMail/SMTP */
  1137.   #ifndef    lint
  1138. ! static char ident[] = "@(#)$Id: smail.c,v 1.27 1993/12/01 03:50:31 jromine Exp $";
  1139.   #endif
  1140.   
  1141.   /* LINTLIBRARY */
  1142. ***************
  1143. *** 113,119 ****
  1144.   static int    sm_werror(), smhear(), sm_rrecord(), sm_rerror();
  1145.   
  1146.   #ifdef    MPOP
  1147. ! extern    int    errno
  1148.   #ifndef    BSD44
  1149.   extern    int    sys_nerr;
  1150.   extern    char   *sys_errlist[];
  1151. --- 113,119 ----
  1152.   static int    sm_werror(), smhear(), sm_rrecord(), sm_rerror();
  1153.   
  1154.   #ifdef    MPOP
  1155. ! extern    int    errno;
  1156.   #ifndef    BSD44
  1157.   extern    int    sys_nerr;
  1158.   extern    char   *sys_errlist[];
  1159. ***************
  1160. *** 162,167 ****
  1161. --- 162,169 ----
  1162.       if (sm_rfp != NULL && sm_wfp != NULL)
  1163.       return RP_OK;
  1164.   
  1165. +     if (client == NULL || *client == '\0')
  1166. +     client = clientname;
  1167.   #ifdef ZMAILER
  1168.       if (client == NULL || *client == '\0')
  1169.       client = "localhost";
  1170. ***************
  1171. *** 302,307 ****
  1172. --- 304,311 ----
  1173.       if (sm_rfp != NULL && sm_wfp != NULL)
  1174.       goto send_options;
  1175.   
  1176. +     if (client == NULL || *client == '\0')
  1177. +     client = clientname;
  1178.   #ifdef ZMAILER
  1179.       if (client == NULL || *client == '\0')
  1180.       client = "localhost";
  1181. *** ../mh-6.8.2/papers/changes/mh-changes.ms    Wed Aug 25 15:58:23 1993
  1182. --- papers/changes/mh-changes.ms    Tue Nov 30 15:57:38 1993
  1183. ***************
  1184. *** 1,2 ****
  1185. ! .\" @(#)$Id: mh-changes.ms,v 1.27 1993/08/25 18:11:13 jromine Exp $
  1186.   .\" Standard -ms macros
  1187. --- 1,2 ----
  1188. ! .\" @(#)$Id: mh-changes.ms,v 1.28 1993/11/30 23:57:26 jromine Exp $
  1189.   .\" Standard -ms macros
  1190. ***************
  1191. *** 6,8 ****
  1192.   .\" remember to update date in text below
  1193. ! .DA "August 25, 1993"
  1194.   .if n \{\
  1195. --- 6,8 ----
  1196.   .\" remember to update date in text below
  1197. ! .DA "December 1, 1993"
  1198.   .if n \{\
  1199. ***************
  1200. *** 99,103 ****
  1201.   .KE
  1202. ! .ds LH Changes for MH 6.8.2
  1203.   .bp
  1204.   .SH
  1205.   CHANGES FOR MH 6.8.2
  1206. --- 99,143 ----
  1207.   .KE
  1208. ! .ds LH Changes for MH 6.8.3
  1209.   .bp
  1210. + .SH 
  1211. + CHANGES FOR MH 6.8.3
  1212. + .LP
  1213. + The MH 6.8.3 maintenance release contains few user-visible
  1214. + changes.  Most of the changes are internal to the
  1215. + multi-media display program \fImhn\fP to support
  1216. + RFC 1521 (the new MIME standard).
  1217. + This is the current version of MH as of December 1, 1993.
  1218. + .SH 
  1219. + Runtime Tailoring
  1220. + .LP
  1221. + When posting mail using the SMTP,
  1222. + \fIpost\fP does not normally send the \fBHELO\fP command.  
  1223. + This is because \fISendMail\fP would fail
  1224. + if the host name given in the \fBHELO\fP command was the local host.
  1225. + Later versions
  1226. + of \fISendMail\fP will now complain if you omit the \fBHELO\fP
  1227. + command.
  1228. + .PP
  1229. + If you specify a hostname with the \fBclientname:\fP option
  1230. + in the \fImtstailor\fP file,
  1231. + \fIpost\fP will give the \fBHELO\fP command with that name,
  1232. + otherwise no \fBHELO\fP command is given.
  1233. + See \fImh-tailor\fP\|(5) for more details.
  1234.   .SH
  1235. + User Interface Programs
  1236. + .IP folder \w'msgchk'u+2n
  1237. + The \fIfolder\fP command now has `\-create' and `\-nocreate'
  1238. + options.  See \fIfolder\fP\|(1) for details.
  1239. + .IP inc
  1240. + A bug where `\-host' would not override the \fBpophost\fP
  1241. + as set in the \fImtstailor\fP file has been fixed.
  1242. + This bug was also fixed in \fImsgchk\fP.
  1243. + .IP mhn
  1244. + The \fImhn\fP command has several changes:
  1245. + updates for conformance with RFC 1521,
  1246. + addition of two caches: public and private,
  1247. + addition of two caching policies: one for reading and one for writing,
  1248. + support for storing multipart entities, and
  1249. + a few bug fixes.  See \fImhn\fP\|(1) for complete details.
  1250. + .SH
  1251.   CHANGES FOR MH 6.8.2
  1252. ***************
  1253. *** 110,113 ****
  1254.   .NL
  1255. ! This is the current released version of \fIMH\fP
  1256. ! as of August 25, 1993.
  1257.   .SH
  1258. --- 150,153 ----
  1259.   .NL
  1260. ! This version of \fIMH\fP 
  1261. ! was released August 25, 1993, but was not widely distributed.
  1262.   .SH
  1263. *** ../mh-6.8.2/sbr/m_getdefs.c    Wed Aug 25 15:57:29 1993
  1264. --- sbr/m_getdefs.c    Fri Sep  3 10:39:02 1993
  1265. ***************
  1266. *** 1,6 ****
  1267.   /* m_getdefs.c - read the user's MH environment */
  1268.   #ifndef    lint
  1269. ! static char ident[] = "@(#)$Id: m_getdefs.c,v 1.7 1993/08/25 17:20:41 jromine Exp $";
  1270.   #endif    /* lint */
  1271.   
  1272.   #include "../h/mh.h"
  1273. --- 1,6 ----
  1274.   /* m_getdefs.c - read the user's MH environment */
  1275.   #ifndef    lint
  1276. ! static char ident[] = "@(#)$Id: m_getdefs.c,v 1.8 1993/09/03 17:38:51 jromine Exp $";
  1277.   #endif    /* lint */
  1278.   
  1279.   #include "../h/mh.h"
  1280. ***************
  1281. *** 24,31 ****
  1282.   #define    FOpen(f,m,e,c)    fopen (f, m)
  1283.   #define    FClose(f)    fclose (f)
  1284.   #else    /* OVERHEAD */
  1285. ! FILE   *FOpen ();
  1286. ! int    FClose ();
  1287.   
  1288.   off_t    lseek ();
  1289.   #endif    /* OVERHEAD */
  1290. --- 24,31 ----
  1291.   #define    FOpen(f,m,e,c)    fopen (f, m)
  1292.   #define    FClose(f)    fclose (f)
  1293.   #else    /* OVERHEAD */
  1294. ! static FILE    *FOpen ();
  1295. ! static int    FClose ();
  1296.   
  1297.   off_t    lseek ();
  1298.   #endif    /* OVERHEAD */
  1299. *** ../mh-6.8.2/support/general/viamail.sh    Wed Aug 25 15:57:05 1993
  1300. --- support/general/viamail.sh    Tue Oct 26 09:05:36 1993
  1301. ***************
  1302. *** 1,3 ****
  1303.   : run this script through /bin/sh
  1304. ! : '@(#)$Id: viamail.sh,v 1.4 1993/08/20 15:49:19 jromine Exp $'
  1305.   
  1306. --- 1,3 ----
  1307.   : run this script through /bin/sh
  1308. ! : '@(#)$Id: viamail.sh,v 1.5 1993/10/26 16:05:23 jromine Exp $'
  1309.   
  1310. ***************
  1311. *** 30,32 ****
  1312.       mhn -viamail "$mailpath" -viasubj "$subject" \
  1313. !     -viaparm "type=tar; x-conversions=x-compress" \
  1314.       -viacmnt "extract with uncompress | tar xvpf -" \
  1315. --- 30,32 ----
  1316.       mhn -viamail "$mailpath" -viasubj "$subject" \
  1317. !     -viaparm "type=tar; x-conversions=compress" \
  1318.       -viacmnt "extract with uncompress | tar xvpf -" \
  1319. *** ../mh-6.8.2/uip/ali.c    Wed Aug 25 15:56:29 1993
  1320. --- uip/ali.c    Wed Sep  1 17:05:24 1993
  1321. ***************
  1322. *** 1,6 ****
  1323.   /* ali.c - the new ali */
  1324.   #ifndef    lint
  1325. ! static char ident[] = "@(#)$Id: ali.c,v 1.8 1992/12/15 00:20:22 jromine Exp $";
  1326.   #endif    /* lint */
  1327.   
  1328.   #include "../h/mh.h"
  1329. --- 1,6 ----
  1330.   /* ali.c - the new ali */
  1331.   #ifndef    lint
  1332. ! static char ident[] = "@(#)$Id: ali.c,v 1.9 1993/09/02 00:05:15 jromine Exp $";
  1333.   #endif    /* lint */
  1334.   
  1335.   #include "../h/mh.h"
  1336. ***************
  1337. *** 137,143 ****
  1338.       }
  1339.   
  1340.       if (!noalias) {
  1341. -     (void) alias (AliasFile);
  1342.       if (cp = m_find ("Aliasfile")) { /* allow Aliasfile: profile entry */
  1343.           char *dp = NULL;
  1344.   
  1345. --- 137,142 ----
  1346. ***************
  1347. *** 148,153 ****
  1348. --- 147,153 ----
  1349.           if (dp)
  1350.           free(dp);
  1351.       }
  1352. +     (void) alias (AliasFile);
  1353.       }
  1354.       
  1355.   
  1356. *** ../mh-6.8.2/uip/dropsbr.c    Wed Aug 25 15:56:28 1993
  1357. --- uip/dropsbr.c    Fri Aug 27 16:00:11 1993
  1358. ***************
  1359. *** 1,6 ****
  1360.   /* dropsbr.c - write to a mailbox */
  1361.   #ifndef    lint
  1362. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.16 1993/08/25 17:25:08 jromine Exp $";
  1363.   #endif    /* lint */
  1364.   
  1365.   #include <stdio.h>
  1366. --- 1,6 ----
  1367.   /* dropsbr.c - write to a mailbox */
  1368.   #ifndef    lint
  1369. ! static char ident[] = "@(#)$Id: dropsbr.c,v 1.17 1993/08/27 23:00:00 jromine Exp $";
  1370.   #endif    /* lint */
  1371.   
  1372.   #include <stdio.h>
  1373. ***************
  1374. *** 534,540 ****
  1375.           tdp->d_size = ntohl(tdp->d_size);
  1376.           tdp->d_start = ntohl(tdp->d_start);
  1377.           tdp->d_stop = ntohl(tdp->d_stop);
  1378. -         tdp++;
  1379.       }
  1380.   #endif
  1381.       *drops = dp;
  1382. --- 534,539 ----
  1383. *** ../mh-6.8.2/uip/folder.c    Wed Aug 25 15:56:47 1993
  1384. --- uip/folder.c    Fri Aug 27 16:23:16 1993
  1385. ***************
  1386. *** 1,6 ****
  1387.   /* folder(s).c - report on folders */
  1388.   #ifndef    lint
  1389. ! static char ident[] = "@(#)$Id: folder.c,v 2.9 1992/12/15 00:20:22 jromine Exp $";
  1390.   #endif    /* lint */
  1391.   
  1392.   #include "../h/mh.h"
  1393. --- 1,6 ----
  1394.   /* folder(s).c - report on folders */
  1395.   #ifndef    lint
  1396. ! static char ident[] = "@(#)$Id: folder.c,v 2.11 1993/08/27 23:23:06 jromine Exp $";
  1397.   #endif    /* lint */
  1398.   
  1399.   #include "../h/mh.h"
  1400. ***************
  1401. *** 19,67 ****
  1402.   #define    ALLSW    0
  1403.       "all", 0,
  1404.   
  1405. ! #define    FASTSW    1
  1406.       "fast", 0,
  1407. ! #define    NFASTSW    2
  1408.       "nofast", 0,
  1409.   
  1410. ! #define    HDRSW    3
  1411.       "header", 0,
  1412. ! #define    NHDRSW    4
  1413.       "noheader", 0,
  1414.   
  1415. ! #define    PACKSW    5
  1416.       "pack", 0,
  1417. ! #define    NPACKSW    6
  1418.       "nopack", 0,
  1419. ! #define    VERBSW    7
  1420.       "verbose", 0,
  1421. ! #define    NVERBSW    8
  1422.       "noverbose", 0,
  1423.   
  1424. ! #define    RECURSW    9
  1425.       "recurse", 0,
  1426. ! #define    NRECRSW    10
  1427.       "norecurse", 0,
  1428.   
  1429. ! #define    TOTALSW    11
  1430.       "total", 0,
  1431. ! #define    NTOTLSW    12
  1432.       "nototal", 0,
  1433.   
  1434. ! #define    PRNTSW    13
  1435.       "print", 0,
  1436. ! #define    NPRNTSW    14
  1437.       "noprint", -4,
  1438. ! #define    LISTSW    15
  1439.       "list", 0,
  1440. ! #define    NLISTSW    16
  1441.       "nolist", 0,
  1442. ! #define    PUSHSW    17
  1443.       "push", 0,
  1444. ! #define    POPSW    18
  1445.       "pop", 0,
  1446.   
  1447. ! #define    HELPSW    19
  1448.       "help", 4,
  1449.   
  1450.       NULL, 0
  1451. --- 19,72 ----
  1452.   #define    ALLSW    0
  1453.       "all", 0,
  1454.   
  1455. ! #define    CREATSW    1
  1456. !     "create", 0,
  1457. ! #define    NCREATSW 2
  1458. !     "nocreate", 0,
  1459. ! 
  1460. ! #define    FASTSW    3
  1461.       "fast", 0,
  1462. ! #define    NFASTSW    4
  1463.       "nofast", 0,
  1464.   
  1465. ! #define    HDRSW    5
  1466.       "header", 0,
  1467. ! #define    NHDRSW    6
  1468.       "noheader", 0,
  1469.   
  1470. ! #define    PACKSW    7
  1471.       "pack", 0,
  1472. ! #define    NPACKSW    8
  1473.       "nopack", 0,
  1474. ! #define    VERBSW    9
  1475.       "verbose", 0,
  1476. ! #define    NVERBSW    10
  1477.       "noverbose", 0,
  1478.   
  1479. ! #define    RECURSW    11
  1480.       "recurse", 0,
  1481. ! #define    NRECRSW    12
  1482.       "norecurse", 0,
  1483.   
  1484. ! #define    TOTALSW    13
  1485.       "total", 0,
  1486. ! #define    NTOTLSW    14
  1487.       "nototal", 0,
  1488.   
  1489. ! #define    PRNTSW    15
  1490.       "print", 0,
  1491. ! #define    NPRNTSW    16
  1492.       "noprint", -4,
  1493. ! #define    LISTSW    17
  1494.       "list", 0,
  1495. ! #define    NLISTSW    18
  1496.       "nolist", 0,
  1497. ! #define    PUSHSW    19
  1498.       "push", 0,
  1499. ! #define    POPSW    20
  1500.       "pop", 0,
  1501.   
  1502. ! #define    HELPSW    21
  1503.       "help", 4,
  1504.   
  1505.       NULL, 0
  1506. ***************
  1507. *** 72,77 ****
  1508. --- 77,83 ----
  1509.   extern int errno;
  1510.   
  1511.   static int  fshort = 0;
  1512. + static int  fcreat = 0;
  1513.   static int  fpack = 0;
  1514.   static int  fverb = 0;
  1515.   static int  fheader = 0;
  1516. ***************
  1517. *** 146,151 ****
  1518. --- 152,164 ----
  1519.               all++;
  1520.               continue;
  1521.   
  1522. +         case CREATSW: 
  1523. +             fcreat = 1;
  1524. +             continue;
  1525. +         case NCREATSW: 
  1526. +             fcreat = -1;
  1527. +             continue;
  1528. + 
  1529.           case FASTSW: 
  1530.               fshort++;
  1531.               continue;
  1532. ***************
  1533. *** 325,334 ****
  1534.       if (stat (strcpy (buf, m_maildir (folder)), &st) == NOTOK) {
  1535.           if (errno != ENOENT)
  1536.           adios (buf, "error on folder");
  1537. !         cp = concat ("Create folder \"", buf, "\"? ", NULLCP);
  1538. !         if (!getanswer (cp))
  1539. !         done (1);
  1540. !         free (cp);
  1541.           if (!makedir (buf))
  1542.           adios (NULLCP, "unable to create folder %s", buf);
  1543.       }
  1544. --- 338,354 ----
  1545.       if (stat (strcpy (buf, m_maildir (folder)), &st) == NOTOK) {
  1546.           if (errno != ENOENT)
  1547.           adios (buf, "error on folder");
  1548. !         switch (fcreat) {
  1549. !         case 0:            /* ask before create */
  1550. !             cp = concat ("Create folder \"", buf, "\"? ", NULLCP);
  1551. !             if (!getanswer (cp))
  1552. !             done (1);
  1553. !             free (cp);
  1554. !             break;
  1555. !         case -1:        /* do not create */
  1556. !             done (1);
  1557. !             break;
  1558. !         }
  1559.           if (!makedir (buf))
  1560.           adios (NULLCP, "unable to create folder %s", buf);
  1561.       }
  1562. *** ../mh-6.8.2/uip/inc.c    Wed Aug 25 15:56:29 1993
  1563. --- uip/inc.c    Wed Sep  1 14:43:18 1993
  1564. ***************
  1565. *** 1,6 ****
  1566.   /* inc.c - incorporate messages from a maildrop into a folder */
  1567.   #ifndef    lint
  1568. ! static char ident[] = "@(#)$Id: inc.c,v 1.21 1993/08/20 15:50:13 jromine Exp $";
  1569.   #endif    /* lint */
  1570.   
  1571.   #ifdef    MAILGROUP
  1572. --- 1,6 ----
  1573.   /* inc.c - incorporate messages from a maildrop into a folder */
  1574.   #ifndef    lint
  1575. ! static char ident[] = "@(#)$Id: inc.c,v 1.22 1993/09/01 21:41:48 jromine Exp $";
  1576.   #endif    /* lint */
  1577.   
  1578.   #ifdef    MAILGROUP
  1579. ***************
  1580. *** 225,230 ****
  1581. --- 225,247 ----
  1582.       mts_init (invo_name);
  1583.   
  1584.   #ifdef    POP
  1585. + #ifdef HESIOD
  1586. +     /*
  1587. +      * Scheme is:
  1588. +      *        use MAILHOST environment variable if present,
  1589. +      *  else try Hesiod.
  1590. +      *  If that fails, use the default (if any)
  1591. +      *  provided by mtstailor in mts_init()
  1592. +      */
  1593. +     if ((tmphost = getenv("MAILHOST")) != NULL)
  1594. +     pophost = tmphost;
  1595. +     else if ((po = hes_getmailhost(getusr())) != NULL &&
  1596. +         strcmp(po->po_type, "POP") == 0)
  1597. +     pophost = po->po_host;
  1598. + #endif /* HESIOD */
  1599. +     if (pophost && *pophost)
  1600. +     host = pophost;
  1601. + 
  1602.       if ((cp = getenv ("MHPOPDEBUG")) && *cp)
  1603.       snoop++;
  1604.   #endif
  1605. ***************
  1606. *** 373,398 ****
  1607.   #endif    /* MAILGROUP */
  1608.   
  1609.   #ifdef    POP
  1610. - #ifdef HESIOD
  1611. -     /*
  1612. -      * Scheme is:
  1613. -      *        use MAILHOST environment variable if present,
  1614. -      *  else try Hesiod.
  1615. -      *  If that fails, use the default (if any)
  1616. -      *  provided by mtstailor in mts_init()
  1617. -      */
  1618. -     if (pophost == NULL || pophost[0] == '\0')
  1619. -       {
  1620. -     if ((tmphost = getenv("MAILHOST")) != NULL)
  1621. -       pophost = tmphost;
  1622. -     else if ((po = hes_getmailhost(getusr())) != NULL &&
  1623. -          strcmp(po->po_type, "POP") == 0)
  1624. -       pophost = po->po_host;
  1625. -       }
  1626. - #endif /* HESIOD */
  1627. -     if (pophost && *pophost)
  1628. -     host = pophost;
  1629. - 
  1630.       if (host && !*host)
  1631.       host = NULL;
  1632.       if (from || !host || rpop <= 0)
  1633. --- 390,395 ----
  1634. *** ../mh-6.8.2/uip/mhn.c    Wed Aug 25 15:56:33 1993
  1635. --- uip/mhn.c    Tue Oct 26 15:18:06 1993
  1636. ***************
  1637. *** 1,6 ****
  1638.   /* mhn.c - multi-media MH */
  1639.   #ifndef    lint
  1640. ! static char ident[] = "@(#)$Id: mhn.c,v 2.23 1993/08/25 17:26:22 jromine Exp $";
  1641.   #endif    /* lint */
  1642.   
  1643.   #include "../h/mh.h"
  1644. --- 1,6 ----
  1645.   /* mhn.c - multi-media MH */
  1646.   #ifndef    lint
  1647. ! static char ident[] = "@(#)$Id: mhn.c,v 2.35 1993/10/26 22:17:44 jromine Exp $";
  1648.   #endif    /* lint */
  1649.   
  1650.   #include "../h/mh.h"
  1651. ***************
  1652. *** 9,14 ****
  1653. --- 9,15 ----
  1654.   #include <setjmp.h>
  1655.   #include <signal.h>
  1656.   #include <stdio.h>
  1657. + #include "../zotnet/mts.h"
  1658.   #include <sys/types.h>
  1659.   #include <sys/stat.h>
  1660.   #ifdef    BSD42
  1661. ***************
  1662. *** 27,130 ****
  1663.       "noauto", 0,
  1664.   
  1665.   #define    CACHESW       2
  1666. !     "cache policy", 0,
  1667.   
  1668. ! #define    CHECKSW    3
  1669.       "check", 0,
  1670. ! #define    NCHECKSW   4
  1671.       "nocheck", 0,
  1672.   
  1673. ! #define    DEBUGSW       5
  1674.       "debug", -5,
  1675.       
  1676. ! #define    EBCDICSW   6
  1677.       "ebcdicsafe", 0,
  1678. ! #define    NEBCDICSW  7
  1679.       "noebcdicsafe", 0,
  1680.   
  1681. ! #define    FORMSW       8
  1682.       "form formfile", 4,
  1683.   
  1684. ! #define    HEADSW       9
  1685.       "headers", 0,
  1686. ! #define    NHEADSW      10
  1687.       "noheaders", 0,
  1688.   
  1689. ! #define    LISTSW      11
  1690.       "list", 0,
  1691. ! #define    NLISTSW      12
  1692.       "nolist", 0,
  1693.   
  1694. ! #define    PARTSW      13
  1695.       "part number", 0,
  1696.   
  1697. ! #define    PAUSESW      14
  1698.       "pause", 0,
  1699. ! #define    NPAUSESW  15
  1700.       "nopause", 0,
  1701.   
  1702. ! #define    SIZESW      16
  1703.       "realsize", 0,
  1704. ! #define    NSIZESW      17
  1705.       "norealsize", 0,
  1706.   
  1707. ! #define    RFC934SW  18
  1708.       "rfc934mode", 0,
  1709. ! #define    NRFC934SW 19
  1710.       "norfc934mode", 0,
  1711.   
  1712. ! #define    SERIALSW  20
  1713.       "serialonly", 0,
  1714. ! #define    NSERIALSW 21
  1715.       "noserialonly", 0,
  1716.   
  1717. ! #define    SHOWSW      22
  1718.       "show", 0,
  1719. ! #define    NSHOWSW      23
  1720.       "noshow", 0,
  1721.   
  1722. ! #define    STORESW      24
  1723.       "store", 0,
  1724. ! #define    NSTORESW  25
  1725.       "nostore", 0,
  1726.   
  1727. ! #define    TYPESW      26
  1728.       "type content", 0,
  1729.   
  1730. ! #define    VERBSW      27
  1731.       "verbose", 0,
  1732. ! #define    NVERBSW      28
  1733.       "noverbose", 0,
  1734.       
  1735. ! #define    HELPSW     29
  1736.       "help", 4,
  1737.   
  1738. ! #define    PROGSW   30
  1739.       "moreproc program", -4,
  1740. ! #define    NPROGSW     31
  1741.       "nomoreproc", -3,
  1742.   
  1743. ! #define    LENSW     32
  1744.       "length lines", -4,
  1745. ! #define    WIDSW     33
  1746.       "width columns", -4,
  1747.   
  1748. ! #define    FILESW     34        /* interface from show */
  1749. !     "file file", -4,
  1750. ! 
  1751. ! #define    VIAMSW     35
  1752.       "viamail mailpath", -7,
  1753. ! #define    VIASSW     36
  1754.       "viasubj subject", -7,
  1755. ! #define    VIAPSW     37
  1756.       "viaparm arguments", -7,
  1757. ! #define    VIADSW     38
  1758.       "viadesc text", -7,
  1759. ! #define    VIACSW     39
  1760.       "viacmnt text", -7,
  1761. ! #define    VIAZSW     40
  1762.       "viadelay seconds", -8,
  1763. ! #define    VIAFSW     41
  1764.       "viafrom mailpath", -7,
  1765.   
  1766.       NULL, 0
  1767. --- 28,139 ----
  1768.       "noauto", 0,
  1769.   
  1770.   #define    CACHESW       2
  1771. !     "cache", 0,
  1772. ! #define    NCACHESW   3
  1773. !     "nocache", 0,
  1774.   
  1775. ! #define    CHECKSW    4
  1776.       "check", 0,
  1777. ! #define    NCHECKSW   5
  1778.       "nocheck", 0,
  1779.   
  1780. ! #define    DEBUGSW       6
  1781.       "debug", -5,
  1782.       
  1783. ! #define    EBCDICSW   7
  1784.       "ebcdicsafe", 0,
  1785. ! #define    NEBCDICSW  8
  1786.       "noebcdicsafe", 0,
  1787.   
  1788. ! #define    FILESW     9        /* interface from show */
  1789. !     "file file", 0,
  1790. ! 
  1791. ! #define    FORMSW       10
  1792.       "form formfile", 4,
  1793.   
  1794. ! #define    HEADSW       11
  1795.       "headers", 0,
  1796. ! #define    NHEADSW      12
  1797.       "noheaders", 0,
  1798.   
  1799. ! #define    LISTSW      13
  1800.       "list", 0,
  1801. ! #define    NLISTSW      14
  1802.       "nolist", 0,
  1803.   
  1804. ! #define    PARTSW      15
  1805.       "part number", 0,
  1806.   
  1807. ! #define    PAUSESW      16
  1808.       "pause", 0,
  1809. ! #define    NPAUSESW  17
  1810.       "nopause", 0,
  1811.   
  1812. ! #define    RCACHESW  18
  1813. !     "rcache policy", 0,
  1814. ! 
  1815. ! #define    SIZESW      19
  1816.       "realsize", 0,
  1817. ! #define    NSIZESW      20
  1818.       "norealsize", 0,
  1819.   
  1820. ! #define    RFC934SW  21
  1821.       "rfc934mode", 0,
  1822. ! #define    NRFC934SW 22
  1823.       "norfc934mode", 0,
  1824.   
  1825. ! #define    SERIALSW  23
  1826.       "serialonly", 0,
  1827. ! #define    NSERIALSW 24
  1828.       "noserialonly", 0,
  1829.   
  1830. ! #define    SHOWSW      25
  1831.       "show", 0,
  1832. ! #define    NSHOWSW      26
  1833.       "noshow", 0,
  1834.   
  1835. ! #define    STORESW      27
  1836.       "store", 0,
  1837. ! #define    NSTORESW  28
  1838.       "nostore", 0,
  1839.   
  1840. ! #define    TYPESW      29
  1841.       "type content", 0,
  1842.   
  1843. ! #define    VERBSW      30
  1844.       "verbose", 0,
  1845. ! #define    NVERBSW      31
  1846.       "noverbose", 0,
  1847. + 
  1848. + #define    WCACHESW  32
  1849. +     "wcache policy", 0,
  1850.       
  1851. ! #define    HELPSW     33
  1852.       "help", 4,
  1853.   
  1854. ! #define    PROGSW   34
  1855.       "moreproc program", -4,
  1856. ! #define    NPROGSW     35
  1857.       "nomoreproc", -3,
  1858.   
  1859. ! #define    LENSW     36
  1860.       "length lines", -4,
  1861. ! #define    WIDSW     37
  1862.       "width columns", -4,
  1863.   
  1864. ! #define    VIAMSW     38
  1865.       "viamail mailpath", -7,
  1866. ! #define    VIASSW     39
  1867.       "viasubj subject", -7,
  1868. ! #define    VIAPSW     40
  1869.       "viaparm arguments", -7,
  1870. ! #define    VIADSW     41
  1871.       "viadesc text", -7,
  1872. ! #define    VIACSW     42
  1873.       "viacmnt text", -7,
  1874. ! #define    VIAZSW     43
  1875.       "viadelay seconds", -8,
  1876. ! #define    VIAFSW     44
  1877.       "viafrom mailpath", -7,
  1878.   
  1879.       NULL, 0
  1880. ***************
  1881. *** 136,153 ****
  1882.   #define    NTYPES    20
  1883.   
  1884.   static struct swit caches[] = {
  1885. ! #define    CACHE_ALWAYS    0
  1886. !     "always", 0,
  1887. ! #define    CACHE_ASK    1
  1888. !     "ask", 0,
  1889. ! #define    CACHE_NEVER    2
  1890.       "never", 0,
  1891.   
  1892.       NULL, 0
  1893.   };
  1894.   
  1895.   static    int    autosw = 0;
  1896. ! static    int    cachesw = CACHE_ASK;
  1897.   static    int    checksw = 0;
  1898.       int    debugsw = 0;
  1899.   static    int    ebcdicsw = 0;
  1900. --- 145,164 ----
  1901.   #define    NTYPES    20
  1902.   
  1903.   static struct swit caches[] = {
  1904. ! #define    CACHE_NEVER    0
  1905.       "never", 0,
  1906. + #define    CACHE_PRIVATE    1
  1907. +     "private", 0,
  1908. + #define    CACHE_PUBLIC    2
  1909. +     "public", 0,
  1910. + #define    CACHE_ASK    3
  1911. +     "ask", 0,
  1912.   
  1913.       NULL, 0
  1914.   };
  1915.   
  1916.   static    int    autosw = 0;
  1917. ! static    int    cachesw = 0;
  1918.   static    int    checksw = 0;
  1919.       int    debugsw = 0;
  1920.   static    int    ebcdicsw = 0;
  1921. ***************
  1922. *** 154,164 ****
  1923. --- 165,177 ----
  1924.   static    char   *formsw = NULLCP;
  1925.   static    int    headsw = 1;
  1926.   static    int    listsw = 0;
  1927. + static    int    nolist = 0;
  1928.   static    int    nomore = 0;
  1929.   static    int    npart = 0;
  1930.   static    char   *parts[NPARTS + 1];
  1931.   static    int    pausesw = 1;
  1932.   static    char   *progsw = NULLCP;
  1933. + static    int    rcachesw = CACHE_ASK;
  1934.   static    int    rfc934sw = 1;
  1935.   static    int    serialsw = 0;
  1936.   static    int    showsw = 0;
  1937. ***************
  1938. *** 167,172 ****
  1939. --- 180,186 ----
  1940.   static    int    ntype = 0;
  1941.   static    char   *types[NTYPES + 1];
  1942.       int    verbosw = 0;
  1943. + static    int    wcachesw = CACHE_ASK;
  1944.   
  1945.   static    int    endian = 0;
  1946.   static  char   *mm_charset = NULL;
  1947. ***************
  1948. *** 174,180 ****
  1949.   static    int    xpid = 0;
  1950.   static    int    userrs = 0;
  1951.   
  1952. ! static    char   *cache;
  1953.   static    int    cwdlen;
  1954.   static    char   *cwd;
  1955.   static    char   *dir;
  1956. --- 188,195 ----
  1957.   static    int    xpid = 0;
  1958.   static    int    userrs = 0;
  1959.   
  1960. ! static    char   *cache_public;
  1961. ! static    char   *cache_private;
  1962.   static    int    cwdlen;
  1963.   static    char   *cwd;
  1964.   static    char   *dir;
  1965. ***************
  1966. *** 299,308 ****
  1967.   }    Content, *CT;
  1968.   #define    NULLCT    ((CT) 0)
  1969.   
  1970. ! static CT get_content ();
  1971. ! static int list_content (), show_content (), store_content ();
  1972. ! static int user_content(), compose_content(), output_content();
  1973. ! static void free_content (), flush_errors ();
  1974.   
  1975.   #if    defined(__STDC__) && defined(VSPRINTF)
  1976.   static void content_error (char *, register CT, char *, ...);
  1977. --- 314,324 ----
  1978.   }    Content, *CT;
  1979.   #define    NULLCT    ((CT) 0)
  1980.   
  1981. ! static CT    get_content ();
  1982. ! static int    list_content (), show_content (), store_content ();
  1983. ! static int    cache_content ();
  1984. ! static int    user_content (), compose_content (), output_content ();
  1985. ! static void    free_content (), flush_errors (), set_id ();
  1986.   
  1987.   #if    defined(__STDC__) && defined(VSPRINTF)
  1988.   static void content_error (char *, register CT, char *, ...);
  1989. ***************
  1990. *** 310,320 ****
  1991.   static void content_error ();
  1992.   #endif
  1993.   
  1994. ! static int   init_encoding(), type_ok(), copy_some_headers(), set_endian();
  1995.   static int   make_intermediates ();
  1996. ! static int   write7Bit(), writeQuoted(), writeBase64(), writeBase64aux();
  1997.   static int   writeDigest (), readDigest ();
  1998. ! static int   via_mail(), via_post(), pidcheck();
  1999.   
  2000.   static    CT    *cts = NULL;
  2001.   
  2002. --- 326,337 ----
  2003.   static void content_error ();
  2004.   #endif
  2005.   
  2006. ! static int   init_encoding (), type_ok (), copy_some_headers (), set_endian ();
  2007.   static int   make_intermediates ();
  2008. ! static int   find_cache (), find_cache_aux (), find_cache_aux2 ();
  2009. ! static int   write7Bit (), writeQuoted (), writeBase64 (), writeBase64aux ();
  2010.   static int   writeDigest (), readDigest ();
  2011. ! static int   via_mail (), via_post (), pidcheck ();
  2012.   
  2013.   static    CT    *cts = NULL;
  2014.   
  2015. ***************
  2016. *** 333,339 ****
  2017.   {
  2018.       int     f6 = 0,
  2019.           msgp = 0,
  2020. !             msgnum;
  2021.       char   *cp,
  2022.          *f1 = NULL,
  2023.          *f2 = NULL,
  2024. --- 350,357 ----
  2025.   {
  2026.       int     f6 = 0,
  2027.           msgp = 0,
  2028. !             msgnum,
  2029. !        *icachesw;
  2030.       char   *cp,
  2031.          *f1 = NULL,
  2032.          *f2 = NULL,
  2033. ***************
  2034. *** 393,401 ****
  2035.               continue;
  2036.   
  2037.           case CACHESW:
  2038.               if (!(cp = *argp++) || *cp == '-')
  2039.               adios (NULLCP, "missing argument to %s", argp[-2]);
  2040. !             switch (cachesw = smatch (cp, caches)) {
  2041.               case AMBIGSW:
  2042.                   ambigsw (cp, caches);
  2043.                   done (1);
  2044. --- 411,431 ----
  2045.               continue;
  2046.   
  2047.           case CACHESW:
  2048. +             cachesw++;
  2049. +             continue;
  2050. +         case NCACHESW:
  2051. +             cachesw = 0;
  2052. +             continue;
  2053. + 
  2054. +         case RCACHESW:
  2055. +             icachesw = &rcachesw;
  2056. +             goto do_cache;
  2057. +         case WCACHESW:
  2058. +             icachesw = &wcachesw;
  2059. + do_cache: ;
  2060.               if (!(cp = *argp++) || *cp == '-')
  2061.               adios (NULLCP, "missing argument to %s", argp[-2]);
  2062. !             switch (*icachesw = smatch (cp, caches)) {
  2063.               case AMBIGSW:
  2064.                   ambigsw (cp, caches);
  2065.                   done (1);
  2066. ***************
  2067. *** 607,613 ****
  2068.       }
  2069.   
  2070.       (void) sprintf (buf, "%s-cache", invo_name);
  2071. !     cache = cachesw != CACHE_NEVER ? m_find (buf) : NULLCP;
  2072.   
  2073.       cwdlen = strlen (cwd = getcpy (pwd ()));
  2074.       (void) sprintf (buf, "%s-storage", invo_name);
  2075. --- 637,648 ----
  2076.       }
  2077.   
  2078.       (void) sprintf (buf, "%s-cache", invo_name);
  2079. !     if ((cache_public = m_find (buf)) && *cache_public != '/')
  2080. !     cache_public = NULL;
  2081. !     (void) sprintf (buf, "%s-private-cache", invo_name);
  2082. !     if (!(cache_private = m_find (buf)))
  2083. !     cache_private = ".cache";
  2084. !     cache_private = getcpy (m_maildir (cache_private));
  2085.   
  2086.       cwdlen = strlen (cwd = getcpy (pwd ()));
  2087.       (void) sprintf (buf, "%s-storage", invo_name);
  2088. ***************
  2089. *** 621,626 ****
  2090. --- 656,662 ----
  2091.       if (msgp == 1
  2092.           && !folder
  2093.           && !npart
  2094. +         && !cachesw
  2095.           && !showsw
  2096.           && !storesw
  2097.           && !ntype
  2098. ***************
  2099. *** 743,749 ****
  2100.       if (!*cts)
  2101.       done (1);
  2102.   
  2103. !     if (!listsw && !showsw && !storesw)
  2104.       showsw++;
  2105.   
  2106.   /* listsw && showsw        -> user wants per-message listing,
  2107. --- 779,785 ----
  2108.       if (!*cts)
  2109.       done (1);
  2110.   
  2111. !     if (!listsw && !showsw && !storesw && !cachesw)
  2112.       showsw++;
  2113.   
  2114.   /* listsw && showsw        -> user wants per-message listing,
  2115. ***************
  2116. *** 757,763 ****
  2117.       (void) signal (SIGPIPE, pipeser);
  2118.   
  2119.       for (ctp = cts; ct = *ctp; ctp++)
  2120. !     if (type_ok (ct)
  2121.               && (ct -> c_ctlistfnx
  2122.                   || ct -> c_ctstorefnx
  2123.                   || ct -> c_ctshowfnx)) {
  2124. --- 793,799 ----
  2125.       (void) signal (SIGPIPE, pipeser);
  2126.   
  2127.       for (ctp = cts; ct = *ctp; ctp++)
  2128. !     if (type_ok (ct, 1)
  2129.               && (ct -> c_ctlistfnx
  2130.                   || ct -> c_ctstorefnx
  2131.                   || ct -> c_ctshowfnx)) {
  2132. ***************
  2133. *** 774,784 ****
  2134.               "description");
  2135.   
  2136.       for (ctp = cts; ct = *ctp; ctp++)
  2137. !         if (type_ok (ct) && ct -> c_ctlistfnx) {
  2138.           (void) umask (ct -> c_umask);
  2139.           (void) (*ct -> c_ctlistfnx) (ct, 1);
  2140.           if (ct -> c_fp)
  2141.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2142.           }
  2143.   
  2144.       flush_errors ();
  2145. --- 810,822 ----
  2146.               "description");
  2147.   
  2148.       for (ctp = cts; ct = *ctp; ctp++)
  2149. !         if (type_ok (ct, 1) && ct -> c_ctlistfnx) {
  2150.           (void) umask (ct -> c_umask);
  2151.           (void) (*ct -> c_ctlistfnx) (ct, 1);
  2152.           if (ct -> c_fp)
  2153.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2154. +         if (ct -> c_ceclosefnx)
  2155. +             (*ct -> c_ceclosefnx) (ct);
  2156.           }
  2157.   
  2158.       flush_errors ();
  2159. ***************
  2160. *** 786,801 ****
  2161.   
  2162.       if (storesw) {
  2163.       for (ctp = cts; ct = *ctp; ctp++)
  2164. !         if (type_ok (ct) && ct -> c_ctstorefnx) {
  2165.           (void) umask (ct -> c_umask);
  2166.           (void) (*ct -> c_ctstorefnx) (ct, NULLCP);
  2167.           if (ct -> c_fp)
  2168.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2169.           }
  2170.   
  2171.       flush_errors ();
  2172.       }
  2173.   
  2174.       if (listsw && !showsw && storesw && sizesw) {
  2175.       if (headsw)
  2176.           printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  2177. --- 824,854 ----
  2178.   
  2179.       if (storesw) {
  2180.       for (ctp = cts; ct = *ctp; ctp++)
  2181. !         if (type_ok (ct, 1) && ct -> c_ctstorefnx) {
  2182.           (void) umask (ct -> c_umask);
  2183.           (void) (*ct -> c_ctstorefnx) (ct, NULLCP);
  2184.           if (ct -> c_fp)
  2185.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2186. +         if (ct -> c_ceclosefnx)
  2187. +             (*ct -> c_ceclosefnx) (ct);
  2188.           }
  2189.   
  2190.       flush_errors ();
  2191.       }
  2192.   
  2193. +     if (cachesw) {
  2194. +     for (ctp = cts; ct = *ctp; ctp++)
  2195. +         if (type_ok (ct, 1)) {
  2196. +         cache_content (ct);
  2197. +         if (ct -> c_fp)
  2198. +             (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2199. +         if (ct -> c_ceclosefnx)
  2200. +             (*ct -> c_ceclosefnx) (ct);
  2201. +         }
  2202. + 
  2203. +     flush_errors ();
  2204. +     }
  2205. + 
  2206.       if (listsw && !showsw && storesw && sizesw) {
  2207.       if (headsw)
  2208.           printf (LSTFMT1, "msg", "part", "type/subtype", "size",
  2209. ***************
  2210. *** 802,812 ****
  2211.               "description");
  2212.   
  2213.       for (ctp = cts; ct = *ctp; ctp++)
  2214. !         if (type_ok (ct) && ct -> c_ctlistfnx) {
  2215.           (void) umask (ct -> c_umask);
  2216.           (void) (*ct -> c_ctlistfnx) (ct, 1);
  2217.           if (ct -> c_fp)
  2218.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2219.           }
  2220.   
  2221.       flush_errors ();
  2222. --- 855,867 ----
  2223.               "description");
  2224.   
  2225.       for (ctp = cts; ct = *ctp; ctp++)
  2226. !         if (type_ok (ct, 1) && ct -> c_ctlistfnx) {
  2227.           (void) umask (ct -> c_umask);
  2228.           (void) (*ct -> c_ctlistfnx) (ct, 1);
  2229.           if (ct -> c_fp)
  2230.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2231. +         if (ct -> c_ceclosefnx)
  2232. +             (*ct -> c_ceclosefnx) (ct);
  2233.           }
  2234.   
  2235.       flush_errors ();
  2236. ***************
  2237. *** 815,824 ****
  2238.   
  2239.       if (showsw)
  2240.       for (ctp = cts; ct = *ctp; ctp++) {
  2241. -         int        child_id,
  2242. -             i,
  2243. -             vecp;
  2244. -         char   *vec[8];
  2245.   #if defined(BSD42) && !defined(WAITINT)
  2246.           union wait status;
  2247.   #else
  2248. --- 870,875 ----
  2249. ***************
  2250. *** 826,832 ****
  2251.   #endif
  2252.           TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  2253.   
  2254. !         if (!type_ok (ct))
  2255.           continue;
  2256.   
  2257.           (void) umask (ct -> c_umask);
  2258. --- 877,883 ----
  2259.   #endif
  2260.           TYPESIG (*hstat) (), (*istat) (), (*qstat) (), (*tstat) ();
  2261.   
  2262. !         if (!type_ok (ct, 0))
  2263.           continue;
  2264.   
  2265.           (void) umask (ct -> c_umask);
  2266. ***************
  2267. *** 843,890 ****
  2268.           if (!ct -> c_ctshowfnx) {
  2269.           if (ct -> c_fp)
  2270.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2271.           continue;
  2272.           }
  2273.   
  2274. !         vecp = 0;
  2275. !         vec[vecp++] = r1bindex (mhlproc, '/');
  2276. !         vec[vecp++] = "-form";
  2277. !         vec[vecp++] = formsw;
  2278. !         vec[vecp++] = "-nobody";
  2279. !         vec[vecp++] = ct -> c_file;
  2280. !         if (nomore)
  2281. !         vec[vecp++] = "-nomoreproc";
  2282. !         else
  2283. !         if (progsw) {
  2284. !             vec[vecp++] = "-moreproc";
  2285. !             vec[vecp++] = progsw;
  2286. !         }
  2287. !         vec[vecp] = NULL;
  2288.   
  2289. !         (void) fflush (stdout);
  2290. ! 
  2291. !         for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  2292. !         sleep (5);
  2293. !         switch (child_id) {
  2294. !             case NOTOK:
  2295. !             adios ("fork", "unable to");
  2296. !             /* NOTREACHED */
  2297.   
  2298. !         case OK:
  2299. !             (void) execvp (mhlproc, vec);
  2300. !             fprintf (stderr, "unable to exec ");
  2301. !             perror (mhlproc);
  2302. !             _exit (-1);
  2303. !             /* NOTREACHED */
  2304.   
  2305. !         default:
  2306. !             xpid = -child_id;
  2307. !             break;
  2308.           }
  2309.   
  2310.           (void) (*ct -> c_ctshowfnx) (ct, 1, 0);
  2311.           if (ct -> c_fp)
  2312.           (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2313.   
  2314.           hstat = signal (SIGHUP, SIG_IGN);
  2315.           istat = signal (SIGINT, SIG_IGN);
  2316. --- 894,954 ----
  2317.           if (!ct -> c_ctshowfnx) {
  2318.           if (ct -> c_fp)
  2319.               (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2320. +         if (ct -> c_ceclosefnx)
  2321. +             (*ct -> c_ceclosefnx) (ct);
  2322.           continue;
  2323.           }
  2324.   
  2325. !         if (strcmp (formsw, "mhl.null")) {
  2326. !         int    child_id,
  2327. !             i,
  2328. !             vecp;
  2329. !         char   *vec[8];
  2330.   
  2331. !         vecp = 0;
  2332. !         vec[vecp++] = r1bindex (mhlproc, '/');
  2333. !         vec[vecp++] = "-form";
  2334. !         vec[vecp++] = formsw;
  2335. !         vec[vecp++] = "-nobody";
  2336. !         vec[vecp++] = ct -> c_file;
  2337. !         if (nomore)
  2338. !             vec[vecp++] = "-nomoreproc";
  2339. !         else
  2340. !             if (progsw) {
  2341. !             vec[vecp++] = "-moreproc";
  2342. !             vec[vecp++] = progsw;
  2343. !             }
  2344. !         vec[vecp] = NULL;
  2345.   
  2346. !         (void) fflush (stdout);
  2347.   
  2348. !         for (i = 0; (child_id = vfork ()) == NOTOK && i < 5; i++)
  2349. !             sleep (5);
  2350. !         switch (child_id) {
  2351. !                 case NOTOK:
  2352. !                 adios ("fork", "unable to");
  2353. !             /* NOTREACHED */
  2354. ! 
  2355. !             case OK:
  2356. !             (void) execvp (mhlproc, vec);
  2357. !             fprintf (stderr, "unable to exec ");
  2358. !             perror (mhlproc);
  2359. !             _exit (-1);
  2360. !             /* NOTREACHED */
  2361. ! 
  2362. !             default:
  2363. !             xpid = -child_id;
  2364. !             break;
  2365. !         }
  2366.           }
  2367. +         else
  2368. +         xpid = 0;
  2369.   
  2370.           (void) (*ct -> c_ctshowfnx) (ct, 1, 0);
  2371.           if (ct -> c_fp)
  2372.           (void) fclose (ct -> c_fp), ct -> c_fp = NULL;
  2373. +         if (ct -> c_ceclosefnx)
  2374. +         (*ct -> c_ceclosefnx) (ct);
  2375.   
  2376.           hstat = signal (SIGHUP, SIG_IGN);
  2377.           istat = signal (SIGINT, SIG_IGN);
  2378. ***************
  2379. *** 1452,1457 ****
  2380. --- 1516,1541 ----
  2381.           return NOTOK;
  2382.       }
  2383.   
  2384. +     if (magic && *cp == '<') {
  2385. +     if (ct -> c_id)
  2386. +         free (ct -> c_id), ct -> c_id = NULL;
  2387. + 
  2388. +     if (!(dp = index (ct -> c_id = ++cp, '>'))) {
  2389. +         advise (NULLCP, "invalid ID in message %s", ct -> c_file);
  2390. +         return NOTOK;
  2391. +     }
  2392. +     
  2393. +     c = *dp, *dp = '\0';
  2394. +     if (*ct -> c_id)
  2395. +         ct -> c_id = concat ("<", ct -> c_id, ">\n", NULLCP);
  2396. +     else
  2397. +         ct -> c_id = NULL;
  2398. +     *dp++ = c, cp = dp;
  2399. + 
  2400. +     while (isspace (*cp))
  2401. +         cp++;
  2402. +     }
  2403. + 
  2404.       if (magic && *cp == '[') {
  2405.       ct -> c_descr = ++cp;
  2406.       for (dp = cp + strlen (cp) - 1; dp >= cp; dp--)
  2407. ***************
  2408. *** 1802,1809 ****
  2409.   
  2410.   /*   */
  2411.   
  2412. ! static int  show_content_aux ();
  2413.   
  2414.   static int  show_content (ct, serial, alternate)
  2415.   register CT    ct;
  2416.   int    serial,
  2417. --- 1886,1894 ----
  2418.   
  2419.   /*   */
  2420.   
  2421. ! static int    show_content_aux (), show_content_aux2 ();
  2422.   
  2423. + 
  2424.   static int  show_content (ct, serial, alternate)
  2425.   register CT    ct;
  2426.   int    serial,
  2427. ***************
  2428. *** 1838,1846 ****
  2429.   register char   *cp;
  2430.   char   *cracked;
  2431.   {
  2432. !     int        child_id,
  2433. !         fd,
  2434. !         i,
  2435.           xlist,
  2436.           xpause,
  2437.           xstdin,
  2438. --- 1923,1929 ----
  2439.   register char   *cp;
  2440.   char   *cracked;
  2441.   {
  2442. !     int        fd,
  2443.           xlist,
  2444.           xpause,
  2445.           xstdin,
  2446. ***************
  2447. *** 1847,1855 ****
  2448.           xtty;
  2449.       register char  *bp;
  2450.       char   *file,
  2451. !        *vec[4],
  2452. !         buffer[BUFSIZ],
  2453. !         exec[BUFSIZ + sizeof "exec "];
  2454.       register CI ci = &ct -> c_ctinfo;
  2455.   
  2456.       if (!ct -> c_ceopenfnx) {
  2457. --- 1930,1936 ----
  2458.           xtty;
  2459.       register char  *bp;
  2460.       char   *file,
  2461. !         buffer[BUFSIZ];
  2462.       register CI ci = &ct -> c_ctinfo;
  2463.   
  2464.       if (!ct -> c_ceopenfnx) {
  2465. ***************
  2466. *** 1890,1895 ****
  2467. --- 1971,1985 ----
  2468.               }
  2469.               break;
  2470.   
  2471. +         case 'd':    /* content description */
  2472. +             if (ct -> c_descr) {
  2473. +             char   *s;
  2474. + 
  2475. +             (void) strcpy (bp, s = trimcpy (ct -> c_descr));
  2476. +             free (s);
  2477. +             }
  2478. +             break;
  2479. + 
  2480.           case 'e':    /* exclusive execution */
  2481.               xtty = 1;
  2482.               break;
  2483. ***************
  2484. *** 1906,1912 ****
  2485.               /* and fall... */
  2486.           case 'l':    /* display listing prior to displaying
  2487.                      content */
  2488. !             xlist = 1;
  2489.               break;
  2490.   
  2491.           case 's':    /* subtype */
  2492. --- 1996,2002 ----
  2493.               /* and fall... */
  2494.           case 'l':    /* display listing prior to displaying
  2495.                      content */
  2496. !             xlist = !nolist;
  2497.               break;
  2498.   
  2499.           case 's':    /* subtype */
  2500. ***************
  2501. *** 1934,1941 ****
  2502. --- 2024,2055 ----
  2503.       (void) strcpy (term, buffer);
  2504.       (void) sprintf (buffer, ct -> c_termproc, term);
  2505.       }
  2506. + 
  2507.   got_command: ;
  2508. +     return show_content_aux2 (ct, serial, alternate, cracked, buffer,
  2509. +                   fd, xlist, xpause, xstdin, xtty);
  2510. + }
  2511.   
  2512. + 
  2513. + static int  show_content_aux2 (ct, serial, alternate, cracked, buffer,
  2514. +                   fd, xlist, xpause, xstdin, xtty)
  2515. + register CT    ct;
  2516. + int    serial,
  2517. +     alternate;
  2518. + char   *cracked,
  2519. +        *buffer;
  2520. + int    fd,
  2521. +     xlist,
  2522. +         xpause,
  2523. +         xstdin,
  2524. +         xtty;
  2525. + {
  2526. +     int        child_id,
  2527. +         i;
  2528. +     char   *vec[4],
  2529. +         exec[BUFSIZ + sizeof "exec "];
  2530. +     register CI ci = &ct -> c_ctinfo;
  2531. +     
  2532.       if (debugsw || cracked) {
  2533.       (void) fflush (stdout);
  2534.   
  2535. ***************
  2536. *** 1960,1966 ****
  2537.       char    prompt[BUFSIZ];
  2538.   
  2539.       if (ct -> c_ctlistfnx) {
  2540. !         (*ct -> c_ctlistfnx) (ct, -1);
  2541.   
  2542.           if (xpause && SOprintf ("Press <return> to show content..."))
  2543.           printf ("Press <return> to show content...");
  2544. --- 2074,2083 ----
  2545.       char    prompt[BUFSIZ];
  2546.   
  2547.       if (ct -> c_ctlistfnx) {
  2548. !         if (ct -> c_type == CT_MULTIPART)
  2549. !         (void) list_content (ct, -1);
  2550. !         else
  2551. !         (*ct -> c_ctlistfnx) (ct, -1);
  2552.   
  2553.           if (xpause && SOprintf ("Press <return> to show content..."))
  2554.           printf ("Press <return> to show content...");
  2555. ***************
  2556. *** 2054,2060 ****
  2557.           else
  2558.           (void) pidcheck (pidXwait (child_id, NULLCP));
  2559.   
  2560. !         (void) (*ct -> c_ceclosefnx) (ct);
  2561.           return (alternate ? DONE : OK);
  2562.       }
  2563.   }
  2564. --- 2171,2178 ----
  2565.           else
  2566.           (void) pidcheck (pidXwait (child_id, NULLCP));
  2567.   
  2568. !         if (fd != NOTOK)
  2569. !         (void) (*ct -> c_ceclosefnx) (ct);
  2570.           return (alternate ? DONE : OK);
  2571.       }
  2572.   }
  2573. ***************
  2574. *** 2215,2237 ****
  2575.   got_filename: ;
  2576.   
  2577.       ct -> c_storage = add (buffer, NULLCP);
  2578. ! /*
  2579. !     if (debugsw) {
  2580. !  */
  2581. !     (void) fflush (stdout);
  2582. ! 
  2583. !     fprintf (stderr, "storing message %s", ct -> c_file);
  2584. !     if (ct -> c_partno)
  2585. !         fprintf (stderr, " part %s", ct -> c_partno);
  2586. !     fprintf (stderr, " as file %s\n",
  2587. !          strncmp (ct -> c_storage, cwd, cwdlen)
  2588. !             || ct -> c_storage[cwdlen] != '/'
  2589. !             ? ct -> c_storage
  2590. !             : ct -> c_storage + cwdlen + 1);
  2591. ! /*
  2592. !     }
  2593. !  */
  2594. ! 
  2595.       if (index (ct -> c_storage, '/')
  2596.           && make_intermediates (ct -> c_storage) == NOTOK)
  2597.       return NOTOK;
  2598. --- 2333,2346 ----
  2599.   got_filename: ;
  2600.   
  2601.       ct -> c_storage = add (buffer, NULLCP);
  2602. !     (void) fflush (stdout);
  2603. !     fprintf (stderr, "storing message %s", ct -> c_file);
  2604. !     if (ct -> c_partno)
  2605. !     fprintf (stderr, " part %s", ct -> c_partno);
  2606. !     fprintf (stderr, " as file %s\n",
  2607. !          strncmp (ct -> c_storage, cwd, cwdlen)
  2608. !             || ct -> c_storage[cwdlen] != '/'
  2609. !              ? ct -> c_storage : ct -> c_storage + cwdlen + 1);
  2610.       if (index (ct -> c_storage, '/')
  2611.           && make_intermediates (ct -> c_storage) == NOTOK)
  2612.       return NOTOK;
  2613. ***************
  2614. *** 2452,2458 ****
  2615.   {
  2616.       register char *cp;
  2617.   
  2618. !     for (cp = file; cp = index (cp, '/'); cp++) {
  2619.       struct stat st;
  2620.   
  2621.       *cp = NULL;
  2622. --- 2561,2567 ----
  2623.   {
  2624.       register char *cp;
  2625.   
  2626. !     for (cp = file + 1; cp = index (cp, '/'); cp++) {
  2627.       struct stat st;
  2628.   
  2629.       *cp = NULL;
  2630. ***************
  2631. *** 2560,2571 ****
  2632.   
  2633.   /*   */
  2634.   
  2635. ! static int  part_ok (ct)
  2636.   register CT    ct;
  2637.   {
  2638.       register char **ap;
  2639.   
  2640. !     if (ct -> c_type == CT_MULTIPART || npart == 0)
  2641.       return 1;
  2642.   
  2643.       for (ap = parts; *ap; ap++)
  2644. --- 2669,2682 ----
  2645.   
  2646.   /*   */
  2647.   
  2648. ! static int  part_ok (ct, sP)
  2649.   register CT    ct;
  2650. + int    sP;
  2651.   {
  2652.       register char **ap;
  2653.   
  2654. !     if ((ct -> c_type == CT_MULTIPART && (sP || ct -> c_subtype))
  2655. !         || npart == 0)
  2656.       return 1;
  2657.   
  2658.       for (ap = parts; *ap; ap++)
  2659. ***************
  2660. *** 2577,2590 ****
  2661.   
  2662.   
  2663.   
  2664. ! static int  type_ok (ct)
  2665.   register CT    ct;
  2666.   {
  2667.       register char **ap;
  2668.       char    buffer[BUFSIZ];
  2669.       register CI        ci = &ct -> c_ctinfo;
  2670.   
  2671. !     if (ct -> c_type == CT_MULTIPART || ntype == 0)
  2672.       return 1;
  2673.   
  2674.       (void) sprintf (buffer, "%s/%s", ci -> ci_type, ci -> ci_subtype);
  2675. --- 2688,2703 ----
  2676.   
  2677.   
  2678.   
  2679. ! static int  type_ok (ct, sP)
  2680.   register CT    ct;
  2681. + int    sP;
  2682.   {
  2683.       register char **ap;
  2684.       char    buffer[BUFSIZ];
  2685.       register CI        ci = &ct -> c_ctinfo;
  2686.   
  2687. !     if ((ct -> c_type == CT_MULTIPART && (sP || ct -> c_subtype))
  2688. !         || ntype == 0)
  2689.       return 1;
  2690.   
  2691.       (void) sprintf (buffer, "%s/%s", ci -> ci_type, ci -> ci_subtype);
  2692. ***************
  2693. *** 2757,2763 ****
  2694.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2695.       register CT  p = part -> mp_part;
  2696.   
  2697. !     if (part_ok (p) && type_ok (p) && p -> c_ctlistfnx)
  2698.           (void) (*p -> c_ctlistfnx) (p, 0);
  2699.       }
  2700.   
  2701. --- 2870,2876 ----
  2702.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2703.       register CT  p = part -> mp_part;
  2704.   
  2705. !     if (part_ok (p, 1) && type_ok (p, 1) && p -> c_ctlistfnx)
  2706.           (void) (*p -> c_ctlistfnx) (p, 0);
  2707.       }
  2708.   
  2709. ***************
  2710. *** 2805,2818 ****
  2711.      alternating -> we are an alternative
  2712.    */
  2713.   
  2714. !     result = OK;
  2715.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2716.       p = part -> mp_part;
  2717.   
  2718. !     if (part_ok (p)
  2719. !             && type_ok (p)
  2720. !             && p -> c_ctshowfnx) {
  2721. !         switch ((*p -> c_ctshowfnx) (p, nowserial, nowalternate)) {
  2722.           case NOTOK:
  2723.               if (alternate && !alternating) {
  2724.               result = NOTOK;
  2725. --- 2918,2932 ----
  2726.      alternating -> we are an alternative
  2727.    */
  2728.   
  2729. !     result = alternate ? NOTOK : OK;
  2730.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2731.       p = part -> mp_part;
  2732.   
  2733. !     if (part_ok (p, 0) && type_ok (p, 0) && p -> c_ctshowfnx) {
  2734. !         int        inneresult;
  2735. ! 
  2736. !         switch (inneresult = (*p -> c_ctshowfnx) (p, nowserial,
  2737. !                               nowalternate)) {
  2738.           case NOTOK:
  2739.               if (alternate && !alternating) {
  2740.               result = NOTOK;
  2741. ***************
  2742. *** 2826,2833 ****
  2743.               result = DONE;
  2744.               break;
  2745.               }
  2746. !             if (alternate)
  2747.               alternate = nowalternate = 0;
  2748.               continue;
  2749.           }
  2750.           break;
  2751. --- 2940,2950 ----
  2752.               result = DONE;
  2753.               break;
  2754.               }
  2755. !             if (alternate) {
  2756.               alternate = nowalternate = 0;
  2757. +             if (result == NOTOK)
  2758. +                 result = inneresult;
  2759. +             }
  2760.               continue;
  2761.           }
  2762.           break;
  2763. ***************
  2764. *** 2895,2900 ****
  2765. --- 3012,3159 ----
  2766.   }
  2767.   
  2768.   
  2769. + static int  show_unknown_multi (ct, serial, alternate)
  2770. + register CT    ct;
  2771. + int    serial,
  2772. +     alternate;
  2773. + {
  2774. +     int        xlist,
  2775. +         xpause,
  2776. +         xtty;
  2777. +     register char  *bp,
  2778. +            *cp;
  2779. +     char    buffer[BUFSIZ];
  2780. +     register struct multipart *m = (struct multipart *) ct -> c_ctparams;
  2781. +     register struct part *part;
  2782. +     register CI ci = &ct -> c_ctinfo;
  2783. +     register CT  p;
  2784. + 
  2785. +     (void) sprintf (buffer, "%s-show-%s/%s", invo_name, ci -> ci_type,
  2786. +             ci -> ci_subtype);
  2787. +     if ((cp = m_find (buffer)) == NULL || *cp == 0) {
  2788. +     (void) sprintf (buffer, "%s-show-%s", invo_name, ci -> ci_type);
  2789. +     if (((cp = m_find (buffer)) == NULL || *cp == 0)
  2790. +             && (cp = ct -> c_showproc) == NULL) {
  2791. +         if (!alternate)
  2792. +         content_error (NULLCP, ct,
  2793. +                    "don't know how to display content");
  2794. + 
  2795. +         return NOTOK;
  2796. +     }
  2797. +     }
  2798. + 
  2799. +     for (part = m -> mp_parts; part; part = part -> mp_next) {
  2800. +     p = part -> mp_part;
  2801. + 
  2802. +     if (!p -> c_ceopenfnx) {
  2803. +         if (!alternate)
  2804. +         content_error (NULLCP, p, "don't know how to decode content");
  2805. + 
  2806. +         return NOTOK;
  2807. +     }
  2808. + 
  2809. +     if (p -> c_storage == NULL) {
  2810. +         if ((*p -> c_ceopenfnx) (p, &p -> c_storage) == NOTOK)
  2811. +         return NOTOK;
  2812. + 
  2813. +         if (p -> c_showproc && strcmp (p -> c_showproc, "true") == 0)
  2814. +         return (alternate ? DONE : OK);
  2815. +         (*p -> c_ceclosefnx) (p);
  2816. +     }
  2817. +     }
  2818. + 
  2819. +     xlist = xpause = xtty = 0;
  2820. +     buffer[0] = '\0';
  2821. +     for (bp = buffer; *cp; cp++)
  2822. +     if (*cp == '%') {
  2823. +         switch (*++cp) {
  2824. +         case 'a':    /* additional arguments */
  2825. +             {
  2826. +             register char **ap,
  2827. +                       **ep;
  2828. +             char   *s = "";
  2829. + 
  2830. +             for (ap = ci -> ci_attrs, ep = ci -> ci_values;
  2831. +                      *ap;
  2832. +                      ap++, ep++) {
  2833. +                 (void) sprintf (bp, "%s%s=\"%s\"", s, *ap, *ep);
  2834. +                 bp += strlen (bp);
  2835. +                 s = " ";
  2836. +             }
  2837. +             }
  2838. +             break;
  2839. + 
  2840. +         case 'd':    /* content description */
  2841. +             if (ct -> c_descr) {
  2842. +             char   *s;
  2843. + 
  2844. +             (void) strcpy (bp, s = trimcpy (ct -> c_descr));
  2845. +             free (s);
  2846. +             }
  2847. +             break;
  2848. + 
  2849. +         case 'e':    /* exclusive execution */
  2850. +             xtty = 1;
  2851. +             break;
  2852. + 
  2853. +         case 'F':    /* %e and %f */
  2854. +             xtty = 1;
  2855. +             /* and fall... */
  2856. +             case 'f':    /* filename(s) */
  2857. +             {
  2858. +             char   *s = "";
  2859. +             
  2860. +             for (part = m -> mp_parts;
  2861. +                      part;
  2862. +                      part = part -> mp_next) {
  2863. +                 p = part -> mp_part;
  2864. + 
  2865. +                 (void) sprintf (bp, "%s'%s'", s, p -> c_storage);
  2866. +                 bp += strlen (bp);
  2867. +                 s = " ";
  2868. +             }
  2869. +             }
  2870. +             break;
  2871. + 
  2872. +         case 'p':    /* pause prior to displaying content */
  2873. +             xpause = pausesw;
  2874. +             /* and fall... */
  2875. +         case 'l':    /* display listing prior to displaying
  2876. +                    content */
  2877. +             xlist = !nolist;
  2878. +             break;
  2879. + 
  2880. +         case 's':    /* subtype */
  2881. +             (void) strcpy (bp, ci -> ci_subtype);
  2882. +             break;
  2883. + 
  2884. +         case '%':
  2885. +             goto raw;
  2886. + 
  2887. +         default:
  2888. +             *bp++ = *--cp;
  2889. +             *bp = '\0';
  2890. +             continue;
  2891. +         }
  2892. +         bp += strlen (bp);
  2893. +     }
  2894. +         else {
  2895. + raw: ;
  2896. +         *bp++ = *cp;
  2897. +         *bp = '\0';
  2898. +     }
  2899. +     if (ct -> c_termproc) {
  2900. +     char    term[BUFSIZ];
  2901. + 
  2902. +     (void) strcpy (term, buffer);
  2903. +     (void) sprintf (buffer, ct -> c_termproc, term);
  2904. +     }
  2905. + 
  2906. +     return show_content_aux2 (ct, serial, alternate, NULLCP, buffer,
  2907. +                   NOTOK, xlist, xpause, 0, xtty);
  2908. + }
  2909. + 
  2910. + 
  2911.   /* ARGSUSED */
  2912.   
  2913.   static int  store_multi (ct, unused)
  2914. ***************
  2915. *** 2909,2916 ****
  2916.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2917.       register CT  p = part -> mp_part;
  2918.   
  2919. !     if (part_ok (p)
  2920. !             && type_ok (p)
  2921.               && p -> c_ctstorefnx
  2922.               && (result = (*p -> c_ctstorefnx) (p, NULLCP)) == OK
  2923.               && ct -> c_subtype == MULTI_ALTERNATE)
  2924. --- 3168,3175 ----
  2925.       for (part = m -> mp_parts; part; part = part -> mp_next) {
  2926.       register CT  p = part -> mp_part;
  2927.   
  2928. !     if (part_ok (p, 1)
  2929. !             && type_ok (p, 1)
  2930.               && p -> c_ctstorefnx
  2931.               && (result = (*p -> c_ctstorefnx) (p, NULLCP)) == OK
  2932.               && ct -> c_subtype == MULTI_ALTERNATE)
  2933. ***************
  2934. *** 3010,3016 ****
  2935.       adios (NULLCP, "out of memory");
  2936.       ct -> c_ctparams = (caddr_t) m;
  2937.       ct -> c_ctlistfnx = list_multi;
  2938. !     ct -> c_ctshowfnx = show_multi;
  2939.       ct -> c_ctstorefnx = store_multi;
  2940.       ct -> c_ctfreefnx = free_multi;
  2941.       
  2942. --- 3269,3276 ----
  2943.       adios (NULLCP, "out of memory");
  2944.       ct -> c_ctparams = (caddr_t) m;
  2945.       ct -> c_ctlistfnx = list_multi;
  2946. !     ct -> c_ctshowfnx = ct -> c_subtype != MULTI_UNKNOWN ? show_multi
  2947. !                              : show_unknown_multi;
  2948.       ct -> c_ctstorefnx = store_multi;
  2949.       ct -> c_ctfreefnx = free_multi;
  2950.       
  2951. ***************
  2952. *** 3335,3347 ****
  2953.       char   *eb_site;
  2954.       char   *eb_dir;
  2955.       char   *eb_mode;
  2956.   
  2957.       char   *eb_server;
  2958.       char   *eb_subject;
  2959.       char   *eb_body;
  2960. - 
  2961. -     unsigned long
  2962. -         eb_size;
  2963.   };
  2964.   
  2965.   
  2966. --- 3595,3606 ----
  2967.       char   *eb_site;
  2968.       char   *eb_dir;
  2969.       char   *eb_mode;
  2970. +     unsigned long
  2971. +         eb_size;
  2972.   
  2973.       char   *eb_server;
  2974.       char   *eb_subject;
  2975.       char   *eb_body;
  2976.   };
  2977.   
  2978.   
  2979. ***************
  2980. *** 3482,3488 ****
  2981.       register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  2982.       register CT        p = e -> eb_content;
  2983.   
  2984. !     if (!type_ok (p))
  2985.       return OK;
  2986.   
  2987.       if (p -> c_ctshowfnx)
  2988. --- 3741,3747 ----
  2989.       register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  2990.       register CT        p = e -> eb_content;
  2991.   
  2992. !     if (!type_ok (p, 0))
  2993.       return OK;
  2994.   
  2995.       if (p -> c_ctshowfnx)
  2996. ***************
  2997. *** 3500,3506 ****
  2998.       register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  2999.       register CT        p = e -> eb_content;
  3000.   
  3001. !     if (!type_ok (p))
  3002.       return OK;
  3003.   
  3004.       p -> c_partno = ct -> c_partno;
  3005. --- 3759,3765 ----
  3006.       register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  3007.       register CT        p = e -> eb_content;
  3008.   
  3009. !     if (!type_ok (p, 1))
  3010.       return OK;
  3011.   
  3012.       p -> c_partno = ct -> c_partno;
  3013. ***************
  3014. *** 3660,3667 ****
  3015.               char   *bp;
  3016.               
  3017.               if ((size = ct -> c_end - p -> c_begin) <= 0) {
  3018. !             content_error (NULLCP, ct,
  3019. !                        "empty body for access-type=mail-server");
  3020.               goto no_body;
  3021.               }
  3022.               
  3023. --- 3919,3927 ----
  3024.               char   *bp;
  3025.               
  3026.               if ((size = ct -> c_end - p -> c_begin) <= 0) {
  3027. !             if (!e -> eb_subject)
  3028. !                 content_error (NULLCP, ct,
  3029. !                        "empty body for access-type=mail-server");
  3030.               goto no_body;
  3031.               }
  3032.               
  3033. ***************
  3034. *** 3736,3742 ****
  3035.       return OK;
  3036.   }
  3037.   
  3038. - 
  3039.   /*     APPLICATION */
  3040.   
  3041.   #define    APPLICATION_UNKNOWN    0x00
  3042. --- 3996,4001 ----
  3043. ***************
  3044. *** 4151,4156 ****
  3045. --- 4410,4416 ----
  3046.   
  3047.   static int  set_endian ()
  3048.   {
  3049. +     char   *cp;
  3050.       union {
  3051.       long    l;
  3052.       char    c[sizeof (long)];
  3053. ***************
  3054. *** 4163,4168 ****
  3055. --- 4423,4431 ----
  3056.            endian > 0 ? "big" : "little");
  3057.   
  3058.       mm_charset = getenv ("MM_CHARSET");
  3059. + 
  3060. +     if ((cp = getenv ("MM_NOASK")) && strcmp (cp, "1") == 0)
  3061. +     nolist = 1, listsw = pausesw = 0;
  3062.   }
  3063.   
  3064.   /*     QUOTED */
  3065. ***************
  3066. *** 4412,4417 ****
  3067. --- 4675,4728 ----
  3068.       return NOTOK;
  3069.       }
  3070.   
  3071. +     if (ct -> c_type == CT_MULTIPART) {
  3072. +     register char **ap,
  3073. +               **ep;
  3074. +     register CI    ci = &ct -> c_ctinfo;
  3075. + 
  3076. +     len = 0;
  3077. + 
  3078. +     fprintf (ce -> ce_fp, "%s: %s/%s", TYPE_FIELD, ci -> ci_type,
  3079. +          ci -> ci_subtype);
  3080. +     len += strlen (TYPE_FIELD) + 2 + strlen (ci -> ci_type)
  3081. +                    + 1 + strlen (ci -> ci_subtype);
  3082. +     for (ap = ci -> ci_attrs, ep = ci -> ci_values; *ap; ap++, ep++) {
  3083. +         (void) putc (';', ce -> ce_fp);
  3084. +         len++;
  3085. + 
  3086. +         (void) sprintf (buffer, "%s=\"%s\"", *ap, *ep);
  3087. + 
  3088. +         if (len + 1 + (cc = strlen (buffer)) >= CPERLIN) {
  3089. +         (void) fputs ("\n\t", ce -> ce_fp);
  3090. +         len = 8;
  3091. +         }
  3092. +         else {
  3093. +         (void) putc (' ', ce -> ce_fp);
  3094. +         len++;
  3095. +         }
  3096. +         fprintf (ce -> ce_fp, "%s", buffer);
  3097. +         len += cc;
  3098. +     }
  3099. +     if (ci -> ci_comment) {
  3100. +         if (len + 1 + (cc = 2 + strlen (ci -> ci_comment)) >= CPERLIN) {
  3101. +         (void) fputs ("\n\t", ce -> ce_fp);
  3102. +         len = 8;
  3103. +         }
  3104. +         else {
  3105. +         (void) putc (' ', ce -> ce_fp);
  3106. +         len++;
  3107. +         }
  3108. +         fprintf (ce -> ce_fp, "(%s)", ci -> ci_comment);
  3109. +         len += cc;
  3110. +     }
  3111. +     fprintf (ce -> ce_fp, "\n");
  3112. +     if (ct -> c_id)
  3113. +         fprintf (ce -> ce_fp, "%s:%s", ID_FIELD, ct -> c_id);
  3114. +     if (ct -> c_descr)
  3115. +         fprintf (ce -> ce_fp, "%s:%s", DESCR_FIELD, ct -> c_descr);
  3116. +     fprintf (ce -> ce_fp, "\n");
  3117. +     }
  3118. + 
  3119.       if ((len = ct -> c_end - ct -> c_begin) < 0)
  3120.       adios (NULLCP, "internal error(3)");
  3121.   
  3122. ***************
  3123. *** 4480,4486 ****
  3124.   char  **file;
  3125.   int    *fd;
  3126.   {
  3127. !     char   *id;
  3128.   
  3129.       if (ce -> ce_fp) {
  3130.       (void) fseek (ce -> ce_fp, 0L, 0);
  3131. --- 4791,4797 ----
  3132.   char  **file;
  3133.   int    *fd;
  3134.   {
  3135. !     char    cachefile[BUFSIZ];
  3136.   
  3137.       if (ce -> ce_fp) {
  3138.       (void) fseek (ce -> ce_fp, 0L, 0);
  3139. ***************
  3140. *** 4499,4545 ****
  3141.       goto ready_already;
  3142.       }
  3143.   
  3144. !     if (xpid) {
  3145. !     if (xpid < 0)
  3146. !         xpid = -xpid;
  3147. !     (void) pidcheck (pidwait (xpid, NOTOK));
  3148. !     xpid = 0;
  3149. !     }
  3150. ! 
  3151. !     if (cache && (id = cb -> c_id)) {
  3152. !     char    buffer[BUFSIZ];
  3153. ! 
  3154. !     (void) sprintf (buffer, "%s/%s", cache, id = trimcpy (id));
  3155. !     free (id);
  3156. ! 
  3157. !     id = getcpy (buffer);
  3158. !     if (ce -> ce_fp = fopen (id, "r")) {
  3159. !         char   *bp;
  3160. !         struct stat    st;
  3161. ! 
  3162. !         if (cachesw == CACHE_ALWAYS)
  3163. !         goto do_cache;
  3164. ! 
  3165. !         (void) fstat (fileno (ce -> ce_fp), &st);
  3166. !         (void) sprintf (bp = buffer,
  3167. !                 "Use cached copy %s of size %lu octets",
  3168. !                 id, (unsigned long) st.st_size);
  3169. !         bp += strlen (bp);
  3170. !         if (ct -> c_partno) {
  3171. !         (void) sprintf (bp, " (content %s)", ct -> c_partno);
  3172. !         bp += strlen (bp);
  3173. !         }
  3174. !         (void) sprintf (bp, "? ");
  3175. !         if (getanswer (buffer)) {
  3176. ! do_cache: ;
  3177. !         ce -> ce_unlink = 0;
  3178. !         ce -> ce_file = id;
  3179. !         goto ready_already;
  3180. !         }
  3181. ! 
  3182. !         (void) fclose (ce -> ce_fp), ce -> ce_fp = NULL;
  3183.       }
  3184. !     free (id);
  3185.       }
  3186.   
  3187.       return OK;
  3188. --- 4810,4823 ----
  3189.       goto ready_already;
  3190.       }
  3191.   
  3192. !     if (find_cache (ct, rcachesw, (int *) 0, cb -> c_id, cachefile) != NOTOK) {
  3193. !     if (ce -> ce_fp = fopen (cachefile, "r")) {
  3194. !         ce -> ce_unlink = 0;
  3195. !         ce -> ce_file = getcpy (cachefile);
  3196. !         goto ready_already;
  3197.       }
  3198. !     else
  3199. !         admonish (cachefile, "unable to fopen for reading");
  3200.       }
  3201.   
  3202.       return OK;
  3203. ***************
  3204. *** 4551,4558 ****
  3205.   register CT    ct;
  3206.   char  **file;
  3207.   {
  3208. !     int        fd;
  3209. !     char   *id;
  3210.       register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  3211.       register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  3212.   
  3213. --- 4829,4837 ----
  3214.   register CT    ct;
  3215.   char  **file;
  3216.   {
  3217. !     int        fd,
  3218. !         cachetype;
  3219. !     char    cachefile[BUFSIZ];
  3220.       register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  3221.       register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  3222.   
  3223. ***************
  3224. *** 4579,4625 ****
  3225.       return NOTOK;
  3226.       }
  3227.   
  3228. !     if (cache
  3229. !         && (id = e -> eb_content -> c_id)
  3230. !         && (!e -> eb_permission
  3231. !             || !uleq (e -> eb_permission, "read-write"))) {
  3232. !     char    buffer[BUFSIZ];
  3233.   
  3234. !     (void) sprintf (buffer, "Make cached, publically-accessible copy of %s? ",
  3235. !             e -> eb_name);
  3236. !     if (cachesw == CACHE_ALWAYS || getanswer (buffer)) {
  3237. !         int        mask;
  3238. !         char    cachefile[BUFSIZ];
  3239. !         FILE   *fp;
  3240.   
  3241. !         (void) sprintf (cachefile, "%s/%s", cache, id = trimcpy (id));
  3242. !         free (id);
  3243.   
  3244. !         mask = umask (0022);
  3245. !         if (fp = fopen (cachefile, "w")) {
  3246. !         int    cc;
  3247. !         register FILE   *gp = ce -> ce_fp;
  3248.   
  3249. !         (void) fseek (gp, 0L, 0);
  3250. ! 
  3251. !         while ((cc = fread (buffer, sizeof *buffer, sizeof buffer,
  3252. !                     gp)) > 0)
  3253. !             (void) fwrite (buffer, sizeof *buffer, cc, fp);
  3254. !         (void) fflush (fp);
  3255. ! 
  3256. !         if (ferror (gp)) {
  3257. !             admonish (ce -> ce_file, "error reading");
  3258. !             (void) unlink (cachefile);
  3259. !         }
  3260. ! 
  3261.           if (ferror (fp)) {
  3262.               admonish (cachefile, "error writing");
  3263.               (void) unlink (cachefile);
  3264.           }
  3265. !         (void) fclose (fp);
  3266. !         }
  3267. !         (void) umask (mask);
  3268.       }
  3269.       }
  3270.   
  3271.       (void) fseek (ce -> ce_fp, 0L, 0);
  3272. --- 4858,4894 ----
  3273.       return NOTOK;
  3274.       }
  3275.   
  3276. !     if ((!e -> eb_permission || !uleq (e -> eb_permission, "read-write"))
  3277. !         && find_cache (NULLCT, wcachesw, &cachetype,
  3278. !                e -> eb_content -> c_id, cachefile) != NOTOK) {
  3279. !     int    mask;
  3280. !     FILE   *fp;
  3281.   
  3282. !     mask = umask (cachetype ? ~m_gmprot () : 0222);
  3283. !     if (fp = fopen (cachefile, "w")) {
  3284. !         int        cc;
  3285. !         char    buffer[BUFSIZ];
  3286. !         FILE   *gp = ce -> ce_fp;
  3287.   
  3288. !         (void) fseek (gp, 0L, 0);
  3289.   
  3290. !         while ((cc = fread (buffer, sizeof *buffer, sizeof buffer, gp))
  3291. !                > 0)
  3292. !         (void) fwrite (buffer, sizeof *buffer, cc, fp);
  3293. !         (void) fflush (fp);
  3294.   
  3295. !         if (ferror (gp)) {
  3296. !         admonish (ce -> ce_file, "error reading");
  3297. !         (void) unlink (cachefile);
  3298. !         }
  3299. !         else
  3300.           if (ferror (fp)) {
  3301.               admonish (cachefile, "error writing");
  3302.               (void) unlink (cachefile);
  3303.           }
  3304. !         (void) fclose (fp);
  3305.       }
  3306. +     (void) umask (mask);
  3307.       }
  3308.   
  3309.       (void) fseek (ce -> ce_fp, 0L, 0);
  3310. ***************
  3311. *** 4633,4642 ****
  3312.   register CT    ct;
  3313.   char  **file;
  3314.   {
  3315. !     int        caching,
  3316.           fd;
  3317. !     char   *ftp,
  3318. !            *id,
  3319.          *user,
  3320.          *pass,
  3321.           buffer[BUFSIZ],
  3322. --- 4902,4912 ----
  3323.   register CT    ct;
  3324.   char  **file;
  3325.   {
  3326. !     int        cachetype,
  3327. !         caching,
  3328.           fd;
  3329. !     char   *bp,
  3330. !        *ftp,
  3331.          *user,
  3332.          *pass,
  3333.           buffer[BUFSIZ],
  3334. ***************
  3335. *** 4670,4682 ****
  3336.       return NOTOK;
  3337.       }
  3338.   
  3339. !     (void) sprintf (buffer,
  3340. !             e -> eb_size > 0
  3341. !             ? "Retrieve %s (content %s)\n    using %sFTP from site %s (%lu octets)? "
  3342. !             : "Retrieve %s (content %s)\n    using %sFTP from site %s? ",
  3343. !             e -> eb_name, e -> eb_partno,
  3344. !             e -> eb_flags ? "anonymous " : "",
  3345. !             e -> eb_site, e -> eb_size);
  3346.       if (!getanswer (buffer))
  3347.       return NOTOK;
  3348.   
  3349. --- 4940,4967 ----
  3350.       return NOTOK;
  3351.       }
  3352.   
  3353. !     if (xpid) {
  3354. !     if (xpid < 0)
  3355. !         xpid = -xpid;
  3356. !     (void) pidcheck (pidwait (xpid, NOTOK));
  3357. !     xpid = 0;
  3358. !     }
  3359. ! 
  3360. !     bp = buffer;
  3361. !     (void) sprintf (bp, "Retrieve %s", e -> eb_name);
  3362. !     bp += strlen (bp);
  3363. !     if (e -> eb_partno) {
  3364. !     (void) sprintf (bp, " (content %s)", e -> eb_partno);
  3365. !     bp += strlen (bp);
  3366. !     }
  3367. !     (void) sprintf (bp, "\n    using %sFTP from site %s",
  3368. !             e -> eb_flags ? "anonymous " : "", e -> eb_site);
  3369. !     bp += strlen (bp);
  3370. !     if (e -> eb_size > 0) {
  3371. !     (void) sprintf (bp, " (%lu octets)", e -> eb_size);
  3372. !     bp += strlen (bp);
  3373. !     }
  3374. !     (void) sprintf (bp, "? ");
  3375.       if (!getanswer (buffer))
  3376.       return NOTOK;
  3377.   
  3378. ***************
  3379. *** 4690,4708 ****
  3380.       }
  3381.   
  3382.       ce -> ce_unlink = *file == NULL, caching = 0, cachefile[0] = 0;
  3383. !     if (cache
  3384. !         && (id = e -> eb_content -> c_id)
  3385. !         && (!e -> eb_permission
  3386. !             || !uleq (e -> eb_permission, "read-write"))) {
  3387. !     (void) sprintf (buffer, "Make cached, publically-accessible copy? ");
  3388. !     if (cachesw == CACHE_ALWAYS || getanswer (buffer)) {
  3389. !         (void) sprintf (cachefile, "%s/%s", cache, id = trimcpy (id));
  3390. !         free (id);
  3391. ! 
  3392. !         if (*file == NULL) {
  3393. !         ce -> ce_unlink = 0;
  3394. !         caching = 1;
  3395. !         }
  3396.       }
  3397.       }
  3398.   
  3399. --- 4975,4986 ----
  3400.       }
  3401.   
  3402.       ce -> ce_unlink = *file == NULL, caching = 0, cachefile[0] = 0;
  3403. !     if ((!e -> eb_permission || !uleq (e -> eb_permission, "read-write"))
  3404. !         && find_cache (NULLCT, wcachesw, &cachetype,
  3405. !                e -> eb_content -> c_id, cachefile) != NOTOK) {
  3406. !     if (*file == NULL) {
  3407. !         ce -> ce_unlink = 0;
  3408. !         caching = 1;
  3409.       }
  3410.       }
  3411.   
  3412. ***************
  3413. *** 4717,4723 ****
  3414.       return NOTOK;
  3415.       }
  3416.   
  3417. - 
  3418.   #ifdef    FTP
  3419.       if (ftp)
  3420.   #endif
  3421. --- 4995,5000 ----
  3422. ***************
  3423. *** 4779,4797 ****
  3424.   
  3425.       if (cachefile[0])
  3426.       if (caching)
  3427. !         (void) chmod (cachefile, 0644);
  3428.       else {
  3429.           int        mask;
  3430. !         register FILE   *fp;
  3431.   
  3432. !         mask = umask (0022);
  3433.           if (fp = fopen (cachefile, "w")) {
  3434. !         register FILE   *gp = ce -> ce_fp;
  3435.   
  3436.           (void) fseek (gp, 0L, 0);
  3437.   
  3438. !         while (fgets (buffer, sizeof buffer - 1, gp))
  3439. !             (void) fputs (buffer, fp);
  3440.           (void) fflush (fp);
  3441.   
  3442.           if (ferror (gp)) {
  3443. --- 5056,5076 ----
  3444.   
  3445.       if (cachefile[0])
  3446.       if (caching)
  3447. !         (void) chmod (cachefile, cachetype ? m_gmprot () : 0444);
  3448.       else {
  3449.           int        mask;
  3450. !         FILE   *fp;
  3451.   
  3452. !         mask = umask (cachetype ? ~m_gmprot () : 0222);
  3453.           if (fp = fopen (cachefile, "w")) {
  3454. !         int    cc;
  3455. !         FILE   *gp = ce -> ce_fp;
  3456.   
  3457.           (void) fseek (gp, 0L, 0);
  3458.   
  3459. !         while ((cc = fread (buffer, sizeof *buffer, sizeof buffer, gp))
  3460. !                    > 0)
  3461. !             (void) fwrite (buffer, sizeof *buffer, cc, fp);
  3462.           (void) fflush (fp);
  3463.   
  3464.           if (ferror (gp)) {
  3465. ***************
  3466. *** 4798,4808 ****
  3467.               admonish (ce -> ce_file, "error reading");
  3468.               (void) unlink (cachefile);
  3469.           }
  3470. ! 
  3471. !         if (ferror (fp)) {
  3472. !             admonish (cachefile, "error writing");
  3473. !             (void) unlink (cachefile);
  3474. !         }
  3475.           (void) fclose (fp);
  3476.           }
  3477.           (void) umask (mask);
  3478. --- 5077,5087 ----
  3479.               admonish (ce -> ce_file, "error reading");
  3480.               (void) unlink (cachefile);
  3481.           }
  3482. !         else
  3483. !             if (ferror (fp)) {
  3484. !             admonish (cachefile, "error writing");
  3485. !             (void) unlink (cachefile);
  3486. !             }
  3487.           (void) fclose (fp);
  3488.           }
  3489.           (void) umask (mask);
  3490. ***************
  3491. *** 4822,4831 ****
  3492.       int        child_id,
  3493.           fd,
  3494.           i,
  3495. -         result,
  3496.           vecp;
  3497.       char   *bp,
  3498. -        *id,
  3499.           buffer[BUFSIZ],
  3500.          *vec[7];
  3501.       register struct exbody *e = (struct exbody *) ct -> c_ctextern;
  3502. --- 5101,5108 ----
  3503. ***************
  3504. *** 4847,4860 ****
  3505.       return NOTOK;
  3506.       }
  3507.   
  3508. !     bp = concat ("Retrieve content ", e -> eb_partno, " by asking mailbox ",
  3509. !          e -> eb_server, "\n\n",
  3510. !          e -> eb_subject ? e -> eb_subject: e -> eb_body, "\n? ",
  3511. !          NULLCP);
  3512. !     result = getanswer (bp);
  3513. !     free (bp);
  3514.   
  3515. !     if (!result)
  3516.       return NOTOK;
  3517.   
  3518.       vecp = 0;
  3519. --- 5124,5147 ----
  3520.       return NOTOK;
  3521.       }
  3522.   
  3523. !     if (xpid) {
  3524. !     if (xpid < 0)
  3525. !         xpid = -xpid;
  3526. !     (void) pidcheck (pidwait (xpid, NOTOK));
  3527. !     xpid = 0;
  3528. !     }
  3529.   
  3530. !     bp = buffer;
  3531. !     (void) sprintf (bp, "Retrieve content");
  3532. !     bp += strlen (bp);
  3533. !     if (e -> eb_partno) {
  3534. !     (void) sprintf (bp, " %s", e -> eb_partno);
  3535. !     bp += strlen (bp);
  3536. !     }
  3537. !     (void) sprintf (bp, " by asking %s\n\n%s\n? ",
  3538. !             e -> eb_server,
  3539. !             e -> eb_subject ? e -> eb_subject : e -> eb_body);
  3540. !     if (!getanswer (buffer))
  3541.       return NOTOK;
  3542.   
  3543.       vecp = 0;
  3544. ***************
  3545. *** 4861,4881 ****
  3546.       vec[vecp++] = r1bindex (mailproc, '/');
  3547.       vec[vecp++] = e -> eb_server;
  3548.       vec[vecp++] = "-subject";
  3549. !     if (e -> eb_subject)
  3550. !     vec[vecp++] = "mail-server request";
  3551. !     else
  3552. !     if (cache
  3553. !             && (id = e -> eb_content -> c_id)
  3554. !             && (!e -> eb_permission
  3555. !                 || !uleq (e -> eb_permission, "read-write"))) {
  3556. !         (void) sprintf (buffer, "cache content as %s/%s", cache,
  3557. !                 id = trimcpy (id));
  3558. !         free (id);
  3559. ! 
  3560. !         vec[vecp++] = buffer;
  3561. !     }
  3562. !     else
  3563. !         vec[vecp++] = "mail-server request";
  3564.       vec[vecp++] = "-body";
  3565.       vec[vecp++] = e -> eb_body;
  3566.       vec[vecp] = NULL;
  3567. --- 5148,5154 ----
  3568.       vec[vecp++] = r1bindex (mailproc, '/');
  3569.       vec[vecp++] = e -> eb_server;
  3570.       vec[vecp++] = "-subject";
  3571. !     vec[vecp++] = e -> eb_subject ? e -> eb_subject : "mail-server request";
  3572.       vec[vecp++] = "-body";
  3573.       vec[vecp++] = e -> eb_body;
  3574.       vec[vecp] = NULL;
  3575. ***************
  3576. *** 4918,4923 ****
  3577. --- 5191,5538 ----
  3578.       return fileno (ce -> ce_fp);
  3579.   }
  3580.   
  3581. + /*     CACHE */
  3582. + 
  3583. + static int  find_cache (ct, policy, writing, id, buffer)
  3584. + CT    ct;
  3585. + int    policy,
  3586. +        *writing;
  3587. + char   *id,
  3588. +        *buffer;
  3589. + {
  3590. +     int        status = NOTOK;
  3591. + 
  3592. +     if (id == NULL)
  3593. +     return NOTOK;
  3594. +     id = trimcpy (id);
  3595. + 
  3596. +     if (debugsw)
  3597. +     fprintf (stderr, "find_cache %s(%d) %s %s\n",
  3598. +          caches[policy].sw, policy, writing ? "writing" : "reading",
  3599. +          id);
  3600. + 
  3601. +     switch (policy) {
  3602. +     case CACHE_NEVER:
  3603. +     default:
  3604. +         break;
  3605. + 
  3606. +     case CACHE_ASK:
  3607. +     case CACHE_PUBLIC:
  3608. +         if (cache_private
  3609. +             && !writing
  3610. +             && find_cache_aux (writing ? 2 : 0, cache_private, id,
  3611. +                        buffer) == OK) {
  3612. +         if (access (buffer, 04) != NOTOK) {
  3613. + got_private: ;
  3614. +             if (writing)
  3615. +             *writing = 1;
  3616. + got_it: ; 
  3617. +             status = OK;
  3618. +             break;
  3619. +         }
  3620. +         }
  3621. +         if (cache_public
  3622. +             && find_cache_aux (writing ? 1 : 0, cache_public, id,
  3623. +                        buffer) == OK) {
  3624. +         if (writing || access (buffer, 04) != NOTOK) {
  3625. +             if (writing)
  3626. +             *writing = 0;
  3627. +             goto got_it;
  3628. +         }
  3629. +         }
  3630. +         break;
  3631. + 
  3632. +     case CACHE_PRIVATE:
  3633. +         if (cache_private
  3634. +             && find_cache_aux (writing ? 2 : 0, cache_private, id,
  3635. +                        buffer) == OK) {
  3636. +         if (writing || access (buffer, 04) != NOTOK)
  3637. +             goto got_private;
  3638. +         }
  3639. +         break;
  3640. + 
  3641. +     }
  3642. + 
  3643. +     if (status == OK && policy == CACHE_ASK) {
  3644. +     char   *bp,
  3645. +         query[BUFSIZ];
  3646. + 
  3647. +     if (xpid) {
  3648. +         if (xpid < 0)
  3649. +         xpid = -xpid;
  3650. +         (void) pidcheck (pidwait (xpid, NOTOK));
  3651. +         xpid = 0;
  3652. +     }
  3653. + 
  3654. +     bp = query;
  3655. +     if (writing)
  3656. +         (void) sprintf (bp, "Make cached, publically-accessible copy");
  3657. +     else {
  3658. +         struct stat st;
  3659. + 
  3660. +         (void) sprintf (bp, "Use cached copy");
  3661. +         bp += strlen (bp);
  3662. +         if (ct -> c_partno) {
  3663. +         (void) sprintf (bp, " of content %s", ct -> c_partno);
  3664. +         bp += strlen (bp);
  3665. +         }
  3666. +         (void) stat (buffer, &st);
  3667. +         (void) sprintf (bp, " (size %lu octets)",
  3668. +                 (unsigned long) st.st_size);
  3669. +     }
  3670. +     bp += strlen (bp);
  3671. +     (void) sprintf (bp, "\n    in file %s? ", buffer);
  3672. +     if (!getanswer (query))
  3673. +         status = NOTOK;
  3674. +     }
  3675. +     if (status == OK && writing) {
  3676. +     if (*writing && index (buffer, '/'))
  3677. +         (void) make_intermediates (buffer);
  3678. +     (void) unlink (buffer);
  3679. +     }
  3680. + 
  3681. +     free (id);
  3682. +     return status;
  3683. + }
  3684. + 
  3685. + /*   */
  3686. + 
  3687. + static int  find_cache_aux (writing, directory, id, buffer)
  3688. + int    writing;
  3689. + char   *directory,
  3690. +        *id,
  3691. +        *buffer;
  3692. + {
  3693. +     int        mask;
  3694. + #ifdef    BSD42
  3695. +     int        usemap = index (id, '/') ? 1 : 0;
  3696. + #else
  3697. +     int        usemap = 1;
  3698. + #endif
  3699. +     char    mapfile[BUFSIZ],
  3700. +         mapname[BUFSIZ];
  3701. +     FILE   *fp;
  3702. +     static int    partno,
  3703. +         pid;
  3704. +     static long clock = 0L;
  3705. + 
  3706. +     if (debugsw)
  3707. +     fprintf (stderr, "find_cache_aux %s usemap=%d\n", directory, usemap);
  3708. + 
  3709. +     (void) sprintf (mapfile, "%s/cache.map", directory);
  3710. +     if (find_cache_aux2 (mapfile, id, mapname) == OK)
  3711. +     goto done_map;
  3712. + 
  3713. +     if (!writing) {
  3714. +     if (usemap)
  3715. +         return NOTOK;
  3716. + 
  3717. + use_raw: ;
  3718. +     (void) sprintf (buffer, "%s/%s", directory, id);
  3719. +     return OK;
  3720. +     }
  3721. + 
  3722. +     if (!usemap && access (mapfile, 02) == NOTOK)
  3723. +     goto use_raw;
  3724. + 
  3725. +     if (clock != 0L) {
  3726. +     long    now;
  3727. +     
  3728. +     (void) time (&now);
  3729. +     if (now > clock)
  3730. +         clock = 0L;
  3731. +     }
  3732. +     else
  3733. +     pid = getpid ();
  3734. +     if (clock == 0L) {
  3735. +     (void) time (&clock);
  3736. +     partno = 0;
  3737. +     }
  3738. +     else
  3739. +     if (partno > 0xff)
  3740. +         clock++, partno = 0;
  3741. + 
  3742. +     (void) sprintf (mapname, "%08x%04x%02x", clock & 0xffffffff,
  3743. +             pid & 0xffff, partno++ & 0xff);
  3744. +     if (debugsw)
  3745. +     fprintf (stderr, "creating mapping %s -> %s\n", mapname, id);
  3746. + 
  3747. +     (void) make_intermediates (mapfile);
  3748. +     mask = umask (writing == 2 ? 0077 : 0);
  3749. +     if (!(fp = lkfopen (mapfile, "a")) && errno == ENOENT) {
  3750. +     int    fd = creat (mapfile, 0666);
  3751. + 
  3752. +     if (fd != NOTOK) {
  3753. +         (void) close (fd);
  3754. +         fp = lkfopen (mapfile, "a");
  3755. +     }
  3756. +     }
  3757. +     (void) umask (mask);
  3758. +     if (!fp)
  3759. +     return NOTOK;
  3760. +     fprintf (fp, "%s: %s\n", mapname, id);
  3761. +     (void) lkfclose (fp, mapfile);
  3762. + 
  3763. + done_map: ;
  3764. +     if (*mapname == '/')
  3765. +     (void) strcpy (buffer, mapname);
  3766. +     else
  3767. +     (void) sprintf (buffer, "%s/%s", directory, mapname);
  3768. +     if (debugsw)
  3769. +     fprintf (stderr, "use %s\n", buffer);
  3770. + 
  3771. +     return OK;
  3772. + }
  3773. + 
  3774. + /*   */
  3775. + 
  3776. + static int  find_cache_aux2 (mapfile, id, mapname)
  3777. + char   *mapfile,
  3778. +        *id,
  3779. +        *mapname;
  3780. + {
  3781. +     int        state;
  3782. +     char    buf[BUFSIZ],
  3783. +         name[NAMESZ];
  3784. +     FILE   *fp;
  3785. + 
  3786. +     if (!(fp = lkfopen (mapfile, "r")))
  3787. +     return NOTOK;
  3788. + 
  3789. +     for (state = FLD;;) {
  3790. +     int    result;
  3791. +     register char  *cp,
  3792. +                *dp;
  3793. + 
  3794. +     switch (state = m_getfld (state, name, buf, sizeof buf, fp)) {
  3795. +         case FLD:
  3796. +         case FLDPLUS:
  3797. +         case FLDEOF:
  3798. +             (void) strcpy (mapname, name);
  3799. +         if (state != FLDPLUS)
  3800. +             cp = buf;
  3801. +         else {
  3802. +             cp = add (buf, NULLCP);
  3803. +             while (state == FLDPLUS) {
  3804. +             state = m_getfld (state, name, buf, sizeof buf, fp);
  3805. +             cp = add (buf, cp);
  3806. +             }
  3807. +         }
  3808. +         dp = trimcpy (cp);
  3809. +         if (cp != buf)
  3810. +             free (cp);
  3811. +         if (debugsw)
  3812. +             fprintf (stderr, "compare %s to %s <- %s\n", id, dp,
  3813. +                  mapname);
  3814. +         result = strcmp (id, dp);
  3815. +         free (dp);
  3816. +         if (result == 0) {
  3817. +             (void) lkfclose (fp, mapfile);
  3818. +             return OK;
  3819. +         }
  3820. +         if (state != FLDEOF)
  3821. +             continue;
  3822. +         /* else fall... */
  3823. + 
  3824. +         case BODY:
  3825. +         case BODYEOF:
  3826. +         case FILEEOF:
  3827. +         default:
  3828. +         break;
  3829. +     }
  3830. +     break;
  3831. +     }
  3832. + 
  3833. +     (void) lkfclose (fp, mapfile);
  3834. +     return NOTOK;
  3835. + }
  3836. + 
  3837. + /*   */
  3838. + 
  3839. + static int  cache_content (ct)
  3840. + register CT    ct;
  3841. + {
  3842. +     int        cachetype;
  3843. +     char   *file,
  3844. +         cachefile[BUFSIZ];
  3845. +     register struct cefile *ce = (struct cefile *) ct -> c_ceparams;
  3846. + 
  3847. +     if (!ct -> c_id) {
  3848. +     advise (NULLCP, "no %s: field in %s", ID_FIELD, ct -> c_file);
  3849. +     return;
  3850. +     }
  3851. + 
  3852. +     if (!ce) {
  3853. +     advise (NULLCP, "unable to decode %s", ct -> c_file);
  3854. +     return;
  3855. +     }
  3856. + 
  3857. +     if (ct -> c_ceopenfnx == openMail) {
  3858. +     advise (NULLCP, "a radish may no know Greek, but I do...");
  3859. +     return;
  3860. +     }
  3861. + 
  3862. +     if (find_cache (NULLCT, wcachesw != CACHE_NEVER ? wcachesw : CACHE_ASK,
  3863. +             &cachetype, ct -> c_id, cachefile)
  3864. +         == NOTOK) {
  3865. +     advise (NULLCP, "unable to cache %s's contents", ct -> c_file);
  3866. +     return;
  3867. +     }
  3868. +     if (wcachesw != CACHE_NEVER && wcachesw != CACHE_ASK) {
  3869. +     (void) fflush (stdout);
  3870. +     fprintf (stderr, "caching message %s as file %s\n", ct -> c_file,
  3871. +          cachefile);
  3872. +     }
  3873. + 
  3874. +     if (ce -> ce_file) {
  3875. +     int    mask = umask (cachetype ? ~m_gmprot () : 0222);
  3876. +     FILE   *fp;
  3877. + 
  3878. +     if (debugsw)
  3879. +         fprintf (stderr, "caching by copying %s...\n", ce -> ce_file);
  3880. + 
  3881. +     file = NULL;
  3882. +     if ((*ct -> c_ceopenfnx) (ct, &file) == NOTOK)
  3883. +         goto reset_umask;
  3884. + 
  3885. +     if (fp = fopen (cachefile, "w")) {
  3886. +         int        cc;
  3887. +         char    buffer[BUFSIZ];
  3888. +         FILE   *gp = ce -> ce_fp;
  3889. + 
  3890. +         (void) fseek (gp, 0L, 0);
  3891. + 
  3892. +         while ((cc = fread (buffer, sizeof *buffer, sizeof buffer, gp))
  3893. +                > 0)
  3894. +         (void) fwrite (buffer, sizeof *buffer, cc, fp);
  3895. +         (void) fflush (fp);
  3896. + 
  3897. +         if (ferror (gp)) {
  3898. +         admonish (ce -> ce_file, "error reading");
  3899. +         (void) unlink (cachefile);
  3900. +         }
  3901. +         else
  3902. +         if (ferror (fp)) {
  3903. +             admonish (cachefile, "error writing");
  3904. +             (void) unlink (cachefile);
  3905. +         }
  3906. +         (void) fclose (fp);
  3907. +     }
  3908. +     else
  3909. +         content_error (cachefile, ct, "unable to fopen for writing");
  3910. + reset_umask: ;
  3911. +     (void) umask (mask);
  3912. +     }
  3913. +     else {
  3914. +     if (debugsw)
  3915. +         fprintf (stderr, "in place caching...\n");
  3916. + 
  3917. +     file = cachefile;
  3918. +     if ((*ct -> c_ceopenfnx) (ct, &file) != NOTOK)
  3919. +         (void) chmod (cachefile, cachetype ? m_gmprot () : 0444);
  3920. +     }
  3921. + }
  3922. + 
  3923.   /*     COMPOSITION */
  3924.   
  3925.   static    char    prefix[] = "----- =_aaaaaaaaaa";
  3926. ***************
  3927. *** 5045,5050 ****
  3928. --- 5660,5667 ----
  3929.       free_content (ct);
  3930.       free_ct = ct = p;
  3931.       }
  3932. +     else
  3933. +     set_id (ct, 1);
  3934.   
  3935.       if ((cp = index (prefix, 'a')) == NULL)
  3936.       adios (NULLCP, "internal error(4)");
  3937. ***************
  3938. *** 5153,5158 ****
  3939. --- 5770,5776 ----
  3940.       *ctp = ct;
  3941.       ci = &ct -> c_ctinfo;
  3942.       ct -> c_ctlistfnx = list_content;
  3943. +     set_id (ct, 0);
  3944.   
  3945.       if (buf[0] != '#' || buf[1] == '#' || buf[1] == '<') {
  3946.       int    headers,
  3947. ***************
  3948. *** 5241,5246 ****
  3949. --- 5859,5869 ----
  3950.           s2i++;
  3951.       switch (ct -> c_type = s2i -> si_value) {
  3952.           case CT_MESSAGE:
  3953. +             if (uleq (ci -> ci_subtype, "rfc822")) {
  3954. +             ct -> c_encoding = CE_7BIT;        /* XXX */
  3955. +             goto call_init;
  3956. +         }
  3957. +         /* else fall... */
  3958.           case CT_MULTIPART:
  3959.           adios (NULLCP,
  3960.                  "it makes sense to define a in-line %s content... NOT!",
  3961. ***************
  3962. *** 5248,5253 ****
  3963. --- 5871,5877 ----
  3964.           /* NOTREACHED */
  3965.   
  3966.           default:
  3967. + call_init: ;
  3968.           if (ct -> c_ctinitfnx = s2i -> si_init)
  3969.               (void) (*ct -> c_ctinitfnx) (ct);
  3970.               break;
  3971. ***************
  3972. *** 5282,5287 ****
  3973. --- 5906,5912 ----
  3974.           if (uleq (ci -> ci_subtype, "external-body"))
  3975.               adios (NULLCP, "use \"#@type/subtype ... [] ...\" instead of \"#%s/%s\"",
  3976.                  ci -> ci_type, ci -> ci_subtype);
  3977. + use_forw: ;
  3978.           adios (NULLCP,
  3979.                  "use \"#forw [+folder] [msgs]\" instead of \"#%s/%s\"",
  3980.                  ci -> ci_type, ci -> ci_subtype);
  3981. ***************
  3982. *** 5294,5305 ****
  3983.       }
  3984.   
  3985.       if (extrnal) {
  3986. -         char    msgid[BUFSIZ];
  3987.           register struct exbody *e;
  3988.           CT        p;
  3989. -         static int    partno;
  3990. -         static long clock = 0L;
  3991. -         static char *msgfmt;
  3992.   
  3993.           if (!ci -> ci_magic)
  3994.           adios (NULLCP, "need external information for \"#@%s/%s\"",
  3995. --- 5919,5926 ----
  3996. ***************
  3997. *** 5334,5350 ****
  3998.           if (params_external (ct, 1) == NOTOK)
  3999.           done (1);
  4000.   
  4001. -         if (clock == 0L) {
  4002. -         (void) time (&clock);
  4003. -         (void) sprintf (msgid, "<%d.%ld.%%d@%s>\n", getpid (), clock,
  4004. -                 LocalName ());
  4005. -         partno = 0;
  4006. -         msgfmt = getcpy (msgid);
  4007. -         }
  4008. - 
  4009. -         (void) sprintf (msgid, msgfmt, ++partno);
  4010. -         p -> c_id = getcpy (msgid);
  4011. - 
  4012.           return OK;
  4013.       }
  4014.   
  4015. --- 5955,5960 ----
  4016. ***************
  4017. *** 5419,5436 ****
  4018.       free (folder);
  4019.   
  4020.       free_ctinfo (ct);
  4021. !     if (get_ctinfo ("multipart/digest", ct, 0) == NOTOK)
  4022. !         done (1);
  4023. !     ct -> c_type = CT_MULTIPART;
  4024. !     ct -> c_subtype = MULTI_DIGEST;
  4025. !     ct -> c_ctlistfnx = list_multi;
  4026. !     ct -> c_ctfreefnx = free_multi;
  4027.   
  4028. !     if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  4029. !         adios (NULLCP, "out of memory");
  4030. !     ct -> c_ctparams = (caddr_t) m;
  4031.   
  4032. !     pp = &m -> mp_parts;
  4033.       for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  4034.           if (mp -> msgstats[msgnum] & SELECTED) {
  4035.           register struct part *part;
  4036. --- 6029,6050 ----
  4037.       free (folder);
  4038.   
  4039.       free_ctinfo (ct);
  4040. !     if (mp -> numsel > 1) {
  4041. !         if (get_ctinfo ("multipart/digest", ct, 0) == NOTOK)
  4042. !         done (1);
  4043. !         ct -> c_type = CT_MULTIPART;
  4044. !         ct -> c_subtype = MULTI_DIGEST;
  4045. !         ct -> c_ctlistfnx = list_multi;
  4046. !         ct -> c_ctfreefnx = free_multi;
  4047.   
  4048. !         if ((m = (struct multipart *) calloc (1, sizeof *m)) == NULL)
  4049. !         adios (NULLCP, "out of memory");
  4050. !         ct -> c_ctparams = (caddr_t) m;
  4051.   
  4052. !         pp = &m -> mp_parts;
  4053. !     }
  4054. !     else
  4055. !         free_content (ct);
  4056.       for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
  4057.           if (mp -> msgstats[msgnum] & SELECTED) {
  4058.           register struct part *part;
  4059. ***************
  4060. *** 5449,5458 ****
  4061.           if (listsw && stat (p -> c_file, &st) != NOTOK)
  4062.               p -> c_end = (long) st.st_size;
  4063.   
  4064. !         if ((part = (struct part *) calloc (1, sizeof *part)) == NULL)
  4065. !             adios (NULLCP, "out of memory");
  4066. !         *pp = part, pp = &part -> mp_next;
  4067. !         part -> mp_part = p;
  4068.           }
  4069.   
  4070.       m_fmsg (mp);
  4071. --- 6063,6077 ----
  4072.           if (listsw && stat (p -> c_file, &st) != NOTOK)
  4073.               p -> c_end = (long) st.st_size;
  4074.   
  4075. !         if (mp -> numsel > 1) {
  4076. !             if ((part = (struct part *) calloc (1, sizeof *part))
  4077. !                 == NULL)
  4078. !             adios (NULLCP, "out of memory");
  4079. !             *pp = part, pp = &part -> mp_next;
  4080. !             part -> mp_part = p;
  4081. !         }
  4082. !         else
  4083. !             *ctp = ct = p;
  4084.           }
  4085.   
  4086.       m_fmsg (mp);
  4087. ***************
  4088. *** 5470,5480 ****
  4089.       adios (NULLCP, "unknown directive \"#%s\"", ci -> ci_type);
  4090.   
  4091.                       /* #begin [ alternative | parallel ] */
  4092. !     vrsn = !ci -> ci_magic ? MULTI_MIXED
  4093. !         : uprf (ci -> ci_magic, "alt") ? MULTI_ALTERNATE
  4094. !                            : MULTI_PARALLEL;
  4095.       free_ctinfo (ct);
  4096. !     (void) sprintf (buffer, "multipart/%s", SubMultiPart[vrsn - 1].kv_key);
  4097.       if (get_ctinfo (buffer, ct, 0) == NOTOK)
  4098.       done (1);
  4099.       ct -> c_type = CT_MULTIPART;
  4100. --- 6089,6109 ----
  4101.       adios (NULLCP, "unknown directive \"#%s\"", ci -> ci_type);
  4102.   
  4103.                       /* #begin [ alternative | parallel ] */
  4104. !     if (!ci -> ci_magic)
  4105. !     cp = SubMultiPart[(vrsn = MULTI_MIXED) - 1].kv_key;
  4106. !     else
  4107. !     if (uleq (ci -> ci_magic, "alternative"))
  4108. !         cp = SubMultiPart[(vrsn = MULTI_ALTERNATE) - 1].kv_key;
  4109. !     else
  4110. !         if (uleq (ci -> ci_magic, "parallel"))
  4111. !         cp = SubMultiPart[(vrsn = MULTI_PARALLEL) - 1].kv_key;
  4112. !     else
  4113. !         if (uprf (ci -> ci_magic, "digest"))
  4114. !         goto use_forw;
  4115. !         else
  4116. !         cp = ci -> ci_magic, vrsn = MULTI_UNKNOWN;
  4117.       free_ctinfo (ct);
  4118. !     (void) sprintf (buffer, "multipart/%s", cp);
  4119.       if (get_ctinfo (buffer, ct, 0) == NOTOK)
  4120.       done (1);
  4121.       ct -> c_type = CT_MULTIPART;
  4122. ***************
  4123. *** 5510,5515 ****
  4124. --- 6139,6166 ----
  4125.   
  4126.   /*   */
  4127.   
  4128. + static void set_id (ct, top)
  4129. + CT    ct;
  4130. + int    top;
  4131. + {
  4132. +     char    msgid[BUFSIZ];
  4133. +     static int  partno;
  4134. +     static long clock = 0L;
  4135. +     static char *msgfmt;
  4136. + 
  4137. +     if (clock == 0L) {
  4138. +     (void) time (&clock);
  4139. +     (void) sprintf (msgid, "<%d.%ld.%%d@%s>\n", getpid (), clock,
  4140. +             LocalName ());
  4141. +     partno = 0;
  4142. +     msgfmt = getcpy (msgid);
  4143. +     }
  4144. +     (void) sprintf (msgid, msgfmt, top ? 0 : ++partno);
  4145. +     ct -> c_id = getcpy (msgid);
  4146. + }
  4147. + 
  4148. + /*   */
  4149. + 
  4150.   static char ebcdicsafe[0x100] = {
  4151.       0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  4152.       0x00, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00,
  4153. ***************
  4154. *** 5905,5911 ****
  4155.           (void) putc (' ', out);
  4156.           len++;
  4157.       }
  4158. !     fprintf (out, "%s", buffer);
  4159.       len += cc;
  4160.       }
  4161.       if (ci -> ci_comment) {
  4162. --- 6556,6562 ----
  4163.           (void) putc (' ', out);
  4164.           len++;
  4165.       }
  4166. !     fputs (buffer, out);
  4167.       len += cc;
  4168.       }
  4169.       if (ci -> ci_comment) {
  4170. ***************
  4171. *** 5920,5926 ****
  4172.       fprintf (out, "(%s)", ci -> ci_comment);
  4173.       len += cc;
  4174.       }
  4175. !     fprintf (out, "\n");
  4176.       if (ct -> c_id)
  4177.       fprintf (out, "%s: %s", ID_FIELD, ct -> c_id);
  4178.       if (ct -> c_descr)
  4179. --- 6571,6577 ----
  4180.       fprintf (out, "(%s)", ci -> ci_comment);
  4181.       len += cc;
  4182.       }
  4183. !     (void) putc ('\n', out);
  4184.       if (ct -> c_id)
  4185.       fprintf (out, "%s: %s", ID_FIELD, ct -> c_id);
  4186.       if (ct -> c_descr)
  4187. ***************
  4188. *** 5936,5942 ****
  4189.           register struct part *part;
  4190.   
  4191.           if (ct -> c_rfc934)
  4192. !             fprintf (out, "\n");
  4193.   
  4194.           for (part = m -> mp_parts; part; part = part -> mp_next) {
  4195.               register CT  p = part -> mp_part;
  4196. --- 6587,6593 ----
  4197.           register struct part *part;
  4198.   
  4199.           if (ct -> c_rfc934)
  4200. !             (void) putc ('\n', out);
  4201.   
  4202.           for (part = m -> mp_parts; part; part = part -> mp_next) {
  4203.               register CT  p = part -> mp_part;
  4204. ***************
  4205. *** 5965,5986 ****
  4206.           (void) writeQuoted (ct, out);
  4207.           break;
  4208.           }
  4209. !         if (ct -> c_subtype != TEXT_PLAIN && ct -> c_encoding != CE_7BIT)
  4210.           goto quoted_printable;
  4211. -         if (checksw)
  4212. -         goto quoted_printable;
  4213.           /* else fall... */
  4214.   
  4215.       case CT_MESSAGE:
  4216.   seven_bit: ;
  4217. !         fprintf (out, "\n");
  4218.           if (ct -> c_type == CT_MESSAGE
  4219.               && ct -> c_subtype == MESSAGE_EXTERNAL) {
  4220.           register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  4221.           
  4222.           (void) output_content (e -> eb_content, out);
  4223. !         if (e -> eb_body)
  4224. !             fprintf (out, "\n%s\n", e -> eb_body);
  4225.           }
  4226.           else
  4227.           (void) write7Bit (ct, out);
  4228. --- 6616,6699 ----
  4229.           (void) writeQuoted (ct, out);
  4230.           break;
  4231.           }
  4232. !         if ((ct -> c_subtype != TEXT_PLAIN && ct -> c_encoding != CE_7BIT)
  4233. !             || checksw)
  4234.           goto quoted_printable;
  4235.           /* else fall... */
  4236.   
  4237.       case CT_MESSAGE:
  4238.   seven_bit: ;
  4239. !         (void) putc ('\n', out);
  4240.           if (ct -> c_type == CT_MESSAGE
  4241.               && ct -> c_subtype == MESSAGE_EXTERNAL) {
  4242.           register struct exbody *e = (struct exbody *) ct -> c_ctparams;
  4243.           
  4244.           (void) output_content (e -> eb_content, out);
  4245. !         if (e -> eb_body) {
  4246. !             register char   *cp;
  4247. ! 
  4248. !             putc ('\n', out);
  4249. !             for (cp = e -> eb_body; *cp; cp++) {
  4250. !             CT    ct2 = e -> eb_content;
  4251. !             CI    ci2 = &ct2 -> c_ctinfo;
  4252. ! 
  4253. !             if (*cp == '\\')
  4254. !                 switch (*++cp) {
  4255. !                 case 'I':
  4256. !                     if (ct2 -> c_id) {
  4257. !                     char *dp = trimcpy (ct2 -> c_id);
  4258. !                     
  4259. !                     (void) fputs (dp, out);
  4260. !                     free (dp);
  4261. !                     }
  4262. !                     continue;
  4263. ! 
  4264. !                 case 'N':
  4265. !                     for (ap = ci2 -> ci_attrs,
  4266. !                          ep = ci2 -> ci_values;
  4267. !                          *ap;
  4268. !                          ap++, ep++)
  4269. !                     if (uleq (*ap, "name")) {
  4270. !                         fprintf (out, "%s", *ep);
  4271. !                         break;
  4272. !                     }
  4273. !                     continue;
  4274. !                         
  4275. !                 case 'T':
  4276. !                     fprintf (out, "%s/%s", ci2 -> ci_type,
  4277. !                          ci2 -> ci_subtype);
  4278. !                     for (ap = ci2 -> ci_attrs,
  4279. !                          ep = ci2 -> ci_values;
  4280. !                          *ap;
  4281. !                          ap++, ep++)
  4282. !                     fprintf (out, "; %s=\"%s\"", *ap, *ep);
  4283. !                     continue;
  4284. ! 
  4285. !                 case 'n':
  4286. !                     (void) putc ('\n', out);
  4287. !                     continue;
  4288. ! 
  4289. !                 case 't':
  4290. !                     (void) putc ('\t', out);
  4291. !                     continue;
  4292. ! 
  4293. !                 case '\0':
  4294. !                     cp--;
  4295. !                     break;
  4296. ! 
  4297. !                 case '\\':
  4298. !                 case '"':
  4299. !                     break;
  4300. ! 
  4301. !                 default:
  4302. !                     (void) putc ('\\', out);
  4303. !                     break;
  4304. !                 }
  4305. ! 
  4306. !             (void) putc (*cp, out);
  4307. !             }
  4308. !             putc ('\n', out);
  4309. !         }
  4310.           }
  4311.           else
  4312.           (void) write7Bit (ct, out);
  4313. ***************
  4314. *** 6072,6078 ****
  4315.               break;
  4316.   
  4317.           default:
  4318. !             if (ebcdicsw && !ebcdicsafe[*cp & 0xff])
  4319.               goto three_print;
  4320.               (void) putc (*cp, out);
  4321.               n++;
  4322. --- 6785,6793 ----
  4323.               break;
  4324.   
  4325.           default:
  4326. !             if (*cp < '!'
  4327. !                 || *cp > '~'
  4328. !                 || (ebcdicsw && !ebcdicsafe[*cp & 0xff]))
  4329.               goto three_print;
  4330.               (void) putc (*cp, out);
  4331.               n++;
  4332. *** ../mh-6.8.2/uip/mhparam.c    Wed Aug 25 15:56:38 1993
  4333. --- uip/mhparam.c    Wed Sep  1 16:01:13 1993
  4334. ***************
  4335. *** 1,6 ****
  4336.   /* mhparam.c - print mh_profile values */
  4337.   #ifndef    lint
  4338. ! static char ident[] = "@(#)$Id: mhparam.c,v 1.7 1992/12/15 00:20:22 jromine Exp $";
  4339.   #endif    /* lint */
  4340.   /* contributed by Jeffrey C Honig <Jeffrey_C_Honig@cornell.edu> */
  4341.   
  4342. --- 1,6 ----
  4343.   /* mhparam.c - print mh_profile values */
  4344.   #ifndef    lint
  4345. ! static char ident[] = "@(#)$Id: mhparam.c,v 1.9 1993/09/01 23:00:59 jromine Exp $";
  4346.   #endif    /* lint */
  4347.   /* contributed by Jeffrey C Honig <Jeffrey_C_Honig@cornell.edu> */
  4348.   
  4349. ***************
  4350. *** 7,12 ****
  4351. --- 7,16 ----
  4352.   #include "../h/mh.h"
  4353.   #include <stdio.h>
  4354.   
  4355. + extern char *mhlibdir;        /* NB: this will change soon */
  4356. + char *sbackup = SBACKUP;
  4357. + char *slink = LINK;
  4358. + 
  4359.   /*   */
  4360.   
  4361.   static struct swit switches[] = {
  4362. ***************
  4363. *** 151,156 ****
  4364. --- 155,164 ----
  4365.        { "vmhproc",    &vmhproc    },
  4366.        { "whatnowproc",    &whatnowproc    },
  4367.        { "whomproc",    &whomproc    },
  4368. +      { "libdir",    &mhlibdir       },
  4369. +      { "sbackup",       &sbackup        },
  4370. +      { "link",          &slink          },
  4371. + 
  4372.        { NULL, NULL },
  4373.   };
  4374.   
  4375. *** ../mh-6.8.2/uip/msgchk.c    Wed Aug 25 15:56:41 1993
  4376. --- uip/msgchk.c    Wed Sep  1 14:44:46 1993
  4377. ***************
  4378. *** 1,6 ****
  4379.   /* msgchk.c - check for mail */
  4380.   #ifndef    lint
  4381. ! static char ident[] = "@(#)$Id: msgchk.c,v 1.12 1993/08/20 15:52:41 jromine Exp $";
  4382.   #endif    /* lint */
  4383.   
  4384.   #include "../h/mh.h"
  4385. --- 1,6 ----
  4386.   /* msgchk.c - check for mail */
  4387.   #ifndef    lint
  4388. ! static char ident[] = "@(#)$Id: msgchk.c,v 1.13 1993/09/01 21:44:19 jromine Exp $";
  4389.   #endif    /* lint */
  4390.   
  4391.   #include "../h/mh.h"
  4392. ***************
  4393. *** 200,224 ****
  4394.   
  4395.   /*   */
  4396.   #ifdef    POP
  4397.   #ifdef HESIOD
  4398. !     /*
  4399. !       * Scheme is:
  4400. !       *        use MAILHOST environment variable if present,
  4401. !       *  else try Hesiod.
  4402. !       *  If that fails, use the default (if any)
  4403. !       *  provided by mtstailor in mts_init()
  4404. !       */
  4405. !     if (pophost == NULL || pophost[0] == '\0')
  4406. !       {
  4407.       if ((tmphost = getenv("MAILHOST")) != NULL)
  4408. !       pophost = tmphost;
  4409.       else if ((po = hes_getmailhost(vecp ? vec[0] : user)) != NULL &&
  4410. !          strcmp(po->po_type, "POP") == 0)
  4411. !       pophost = po->po_host;
  4412. !       }
  4413.   #endif /* HESIOD */
  4414. !     if (pophost && *pophost)
  4415. !     host = pophost;
  4416.       if (!host || !*host)
  4417.       host = NULL;
  4418.       if (!host || rpop <= 0)
  4419. --- 200,223 ----
  4420.   
  4421.   /*   */
  4422.   #ifdef    POP
  4423. +     if (!host || !*host) {    /* -host not specified by user */
  4424.   #ifdef HESIOD
  4425. !     /*
  4426. !      * Scheme is:
  4427. !      *        use MAILHOST environment variable if present,
  4428. !      *  else try Hesiod.
  4429. !      *  If that fails, use the default (if any)
  4430. !      *  provided by mtstailor in mts_init()
  4431. !      */
  4432.       if ((tmphost = getenv("MAILHOST")) != NULL)
  4433. !         pophost = tmphost;
  4434.       else if ((po = hes_getmailhost(vecp ? vec[0] : user)) != NULL &&
  4435. !         strcmp(po->po_type, "POP") == 0)
  4436. !         pophost = po->po_host;
  4437.   #endif /* HESIOD */
  4438. !     if (pophost && *pophost)
  4439. !         host = pophost;
  4440. !     }
  4441.       if (!host || !*host)
  4442.       host = NULL;
  4443.       if (!host || rpop <= 0)
  4444. *** ../mh-6.8.2/uip/msh.c    Wed Aug 25 15:56:34 1993
  4445. --- uip/msh.c    Thu Aug 26 11:25:31 1993
  4446. ***************
  4447. *** 1,6 ****
  4448.   /* msh.c - The MH shell (sigh) */
  4449.   #ifndef    lint
  4450. ! static char ident[] = "@(#)$Id: msh.c,v 2.13 1992/12/15 00:20:22 jromine Exp jromine $";
  4451.   #endif    /* lint */
  4452.   
  4453.   /* TODO:
  4454. --- 1,6 ----
  4455.   /* msh.c - The MH shell (sigh) */
  4456.   #ifndef    lint
  4457. ! static char ident[] = "@(#)$Id: msh.c,v 2.13 1992/12/15 00:20:22 jromine Exp $";
  4458.   #endif    /* lint */
  4459.   
  4460.   /* TODO:
  4461. *** ../mh-6.8.2/uip/mshcmds.c    Wed Aug 25 15:56:37 1993
  4462. --- uip/mshcmds.c    Tue Nov 30 19:50:38 1993
  4463. ***************
  4464. *** 1,6 ****
  4465.   /* mshcmds.c - command handlers in msh */
  4466.   #ifndef    lint
  4467. ! static char ident[] = "@(#)$Id: mshcmds.c,v 1.25 1992/12/15 00:20:22 jromine Exp jromine $";
  4468.   #endif    /* lint */
  4469.   
  4470.   #include "../h/mh.h"
  4471. --- 1,6 ----
  4472.   /* mshcmds.c - command handlers in msh */
  4473.   #ifndef    lint
  4474. ! static char ident[] = "@(#)$Id: mshcmds.c,v 1.28 1993/12/01 03:50:31 jromine Exp $";
  4475.   #endif    /* lint */
  4476.   
  4477.   #include "../h/mh.h"
  4478. ***************
  4479. *** 2708,2714 ****
  4480.           state;
  4481.       register char   *bp,
  4482.               *dp;
  4483. !     char   *cp,
  4484.           buf[BUFSIZ],
  4485.           name[NAMESZ];
  4486.       FILE   *fp;
  4487. --- 2708,2715 ----
  4488.           state;
  4489.       register char   *bp,
  4490.               *dp;
  4491. !     char   *chset,
  4492. !        *cp,
  4493.           buf[BUFSIZ],
  4494.           name[NAMESZ];
  4495.       FILE   *fp;
  4496. ***************
  4497. *** 2719,2724 ****
  4498. --- 2720,2728 ----
  4499.   
  4500.       fp = msh_ready (msgnum, 1);
  4501.   
  4502. +     if (!(chset = getenv ("MM_CHARSET")))
  4503. +     chset = "us-ascii";
  4504. + 
  4505.       for (state = FLD;;)
  4506.       switch (state = m_getfld (state, name, buf, sizeof buf, fp)) {
  4507.           case FLD:
  4508. ***************
  4509. *** 2793,2809 ****
  4510.               while (isspace (*dp))
  4511.                   dp++;
  4512.               if (*dp == '"') {
  4513. !                 dp++;
  4514. !                 if (strlen (dp) >= sizeof "us-ascii\""
  4515. !                     && *(bp = dp + sizeof "us-ascii" - 1)=='"')
  4516.                   *bp = NULL;
  4517.               }
  4518.               else
  4519. !                 if (strlen (dp) >= sizeof "us-ascii"
  4520. !                     && isspace (*(bp =
  4521. !                         dp + sizeof "us-ascii" - 1)))
  4522. !                 *bp = NULL;
  4523. !             result = !uleq (dp, "us-ascii");
  4524.               }
  4525.               else
  4526.               if (!(result = !uleq (bp, "text"))) {
  4527. --- 2797,2815 ----
  4528.               while (isspace (*dp))
  4529.                   dp++;
  4530.               if (*dp == '"') {
  4531. !                 if (bp = index (++dp, '"'))
  4532.                   *bp = NULL;
  4533.               }
  4534.               else
  4535. !                 for (bp = dp; *bp; bp++)
  4536. !                 if (isspace (*bp)) {
  4537. !                     *bp = NULL;
  4538. !                     break;
  4539. !                 }
  4540. !             if ((result = !uleq (dp, chset))
  4541. !                     && uleq (dp, "us-ascii")
  4542. !                     && uleq (chset, "iso-8859-1"))
  4543. !                 result = 0;
  4544.               }
  4545.               else
  4546.               if (!(result = !uleq (bp, "text"))) {
  4547. ***************
  4548. *** 2833,2840 ****
  4549.               for (dp = bp; istoken (*dp); dp++)
  4550.               continue;
  4551.               *dp = NULL;
  4552. !             if (result = !uleq (bp, "7bit"))
  4553. !                 Msgs[msgnum].m_flags |= MHNYES;
  4554.   
  4555.               free (cp);
  4556.               if (result) {
  4557. --- 2839,2847 ----
  4558.               for (dp = bp; istoken (*dp); dp++)
  4559.               continue;
  4560.               *dp = NULL;
  4561. !             result = !uleq (bp, "7bit")
  4562. !                 && !uleq (bp, "8bit")
  4563. !                 && !uleq (bp, "binary");
  4564.   
  4565.               free (cp);
  4566.               if (result) {
  4567. *** ../mh-6.8.2/uip/popsbr.c    Wed Aug 25 15:56:34 1993
  4568. --- uip/popsbr.c    Thu Aug 26 11:26:07 1993
  4569. ***************
  4570. *** 1,6 ****
  4571.   /* popsbr.c - POP client subroutines */
  4572.   #ifndef    lint
  4573. ! static char ident[] = "@(#)$Id: popsbr.c,v 2.5 1993/08/25 17:26:40 jromine Exp $";
  4574.   #endif    lint
  4575.   
  4576.   #if defined(NNTP) && !defined(PSHSBR)
  4577. --- 1,6 ----
  4578.   /* popsbr.c - POP client subroutines */
  4579.   #ifndef    lint
  4580. ! static char ident[] = "@(#)$Id: popsbr.c,v 2.6 1993/08/26 18:25:52 jromine Exp $";
  4581.   #endif    lint
  4582.   
  4583.   #if defined(NNTP) && !defined(PSHSBR)
  4584. ***************
  4585. *** 198,205 ****
  4586.   #endif
  4587.           }
  4588.   #else    /* NNTP */
  4589. !         if (*response < CHAR_ERR)
  4590.           return OK;
  4591.   #endif
  4592.           (void) strcpy (buffer, response);
  4593.           (void) command ("QUIT");
  4594. --- 198,207 ----
  4595.   #endif
  4596.           }
  4597.   #else    /* NNTP */
  4598. !         if (*response < CHAR_ERR) {
  4599. !         (void) command ("MODE READER");
  4600.           return OK;
  4601. +         }
  4602.   #endif
  4603.           (void) strcpy (buffer, response);
  4604.           (void) command ("QUIT");
  4605. ***************
  4606. *** 302,309 ****
  4607. --- 304,316 ----
  4608.   int    pop_exists (action)
  4609.   int    (*action) ();
  4610.   {
  4611. + #ifdef    XMSGS        /* hacked into NNTP 1.5 */
  4612.       if (traverse (action, "XMSGS %d-%d",
  4613.           (targ_t)xtnd_first, (targ_t)xtnd_last, 0, 0) == OK)
  4614. +     return OK;
  4615. + #endif
  4616. +     if (traverse (action, "LISTGROUP",    /* provided by INN 1.4 */
  4617. +         0, 0, 0, 0) == OK)
  4618.       return OK;
  4619.       return traverse (action, "XHDR NONAME %d-%d",
  4620.           (targ_t)xtnd_first, (targ_t)xtnd_last, 0, 0);
  4621. *** ../mh-6.8.2/uip/pshsbr.c    Wed Aug 25 15:56:34 1993
  4622. --- uip/pshsbr.c    Thu Aug 26 11:26:07 1993
  4623. ***************
  4624. *** 1,6 ****
  4625.   /* popsbr.c - POP client subroutines */
  4626.   #ifndef    lint
  4627. ! static char ident[] = "@(#)$Id: popsbr.c,v 2.5 1993/08/25 17:26:40 jromine Exp $";
  4628.   #endif    lint
  4629.   
  4630.   #if defined(NNTP) && !defined(PSHSBR)
  4631. --- 1,6 ----
  4632.   /* popsbr.c - POP client subroutines */
  4633.   #ifndef    lint
  4634. ! static char ident[] = "@(#)$Id: popsbr.c,v 2.6 1993/08/26 18:25:52 jromine Exp $";
  4635.   #endif    lint
  4636.   
  4637.   #if defined(NNTP) && !defined(PSHSBR)
  4638. ***************
  4639. *** 198,205 ****
  4640.   #endif
  4641.           }
  4642.   #else    /* NNTP */
  4643. !         if (*response < CHAR_ERR)
  4644.           return OK;
  4645.   #endif
  4646.           (void) strcpy (buffer, response);
  4647.           (void) command ("QUIT");
  4648. --- 198,207 ----
  4649.   #endif
  4650.           }
  4651.   #else    /* NNTP */
  4652. !         if (*response < CHAR_ERR) {
  4653. !         (void) command ("MODE READER");
  4654.           return OK;
  4655. +         }
  4656.   #endif
  4657.           (void) strcpy (buffer, response);
  4658.           (void) command ("QUIT");
  4659. ***************
  4660. *** 302,309 ****
  4661. --- 304,316 ----
  4662.   int    pop_exists (action)
  4663.   int    (*action) ();
  4664.   {
  4665. + #ifdef    XMSGS        /* hacked into NNTP 1.5 */
  4666.       if (traverse (action, "XMSGS %d-%d",
  4667.           (targ_t)xtnd_first, (targ_t)xtnd_last, 0, 0) == OK)
  4668. +     return OK;
  4669. + #endif
  4670. +     if (traverse (action, "LISTGROUP",    /* provided by INN 1.4 */
  4671. +         0, 0, 0, 0) == OK)
  4672.       return OK;
  4673.       return traverse (action, "XHDR NONAME %d-%d",
  4674.           (targ_t)xtnd_first, (targ_t)xtnd_last, 0, 0);
  4675. *** ../mh-6.8.2/uip/replsbr.c    Wed Aug 25 15:56:26 1993
  4676. --- uip/replsbr.c    Sat Sep  4 12:31:54 1993
  4677. ***************
  4678. *** 1,6 ****
  4679.   /* replsbr.c - routines to help repl along... */
  4680.   #ifndef    lint
  4681. ! static char ident[] = "@(#)$Id: replsbr.c,v 1.15 1993/08/25 17:27:35 jromine Exp $";
  4682.   #endif    /* lint */
  4683.   
  4684.   #include "../h/mh.h"
  4685. --- 1,6 ----
  4686.   /* replsbr.c - routines to help repl along... */
  4687.   #ifndef    lint
  4688. ! static char ident[] = "@(#)$Id: replsbr.c,v 1.17 1993/09/04 19:31:32 jromine Exp $";
  4689.   #endif    /* lint */
  4690.   
  4691.   #include "../h/mh.h"
  4692. ***************
  4693. *** 8,13 ****
  4694. --- 8,15 ----
  4695.   #include "../h/formatsbr.h"
  4696.   #include <ctype.h>
  4697.   #include <stdio.h>
  4698. + #include <sys/types.h>        /* off_t */
  4699. + #include <sys/file.h>        /* L_SET */
  4700.   
  4701.   
  4702.   extern short    ccto,        /* from repl.c */
  4703. ***************
  4704. *** 411,416 ****
  4705. --- 413,419 ----
  4706.       mhl = r1bindex (mhlproc, '/');
  4707.   
  4708.       rewind (in);
  4709. +     (void) lseek (fileno(in), (off_t)0, L_SET);
  4710.       (void) fflush (out);
  4711.   
  4712.       switch (pid = vfork ()) {
  4713. ***************
  4714. *** 422,431 ****
  4715.           (void) dup2 (fileno (out), fileno (stdout));
  4716.           closefds (3);
  4717.   
  4718. - #ifdef _FSTDIO
  4719. -         /* <sigh> the code assumed that rewind does this. */
  4720. -         (void) lseek (fileno(stdin), (off_t)0, SEEK_SET);
  4721. - #endif
  4722.           execlp (mhlproc, mhl, "-form", filter, "-noclear", NULLCP);
  4723.           fprintf (stderr, "unable to exec ");
  4724.           perror (mhlproc);
  4725. --- 425,430 ----
  4726. *** ../mh-6.8.2/uip/show.c    Wed Aug 25 15:56:35 1993
  4727. --- uip/show.c    Tue Oct 26 13:09:41 1993
  4728. ***************
  4729. *** 1,6 ****
  4730.   /* show.c - list messages */
  4731.   #ifndef    lint
  4732. ! static char ident[] = "@(#)$Id: show.c,v 1.12 1992/12/15 00:20:22 jromine Exp $";
  4733.   #endif    /* lint */
  4734.   
  4735.   #include "../h/mh.h"
  4736. --- 1,6 ----
  4737.   /* show.c - list messages */
  4738.   #ifndef    lint
  4739. ! static char ident[] = "@(#)$Id: show.c,v 1.14 1993/10/26 20:09:21 jromine Exp $";
  4740.   #endif    /* lint */
  4741.   
  4742.   #include "../h/mh.h"
  4743. ***************
  4744. *** 336,342 ****
  4745.           state;
  4746.       register char   *bp,
  4747.               *dp;
  4748. !     char   *cp,
  4749.           buf[BUFSIZ],
  4750.           name[NAMESZ];
  4751.       FILE   *fp;
  4752. --- 336,343 ----
  4753.           state;
  4754.       register char   *bp,
  4755.               *dp;
  4756. !     char   *chset,
  4757. !        *cp,
  4758.           buf[BUFSIZ],
  4759.           name[NAMESZ];
  4760.       FILE   *fp;
  4761. ***************
  4762. *** 344,349 ****
  4763. --- 345,353 ----
  4764.       if ((fp = fopen (msgnam, "r")) == NULL)
  4765.       return 0;
  4766.   
  4767. +     if (!(chset = getenv ("MM_CHARSET")))
  4768. +     chset = "us-ascii";
  4769. + 
  4770.       for (state = FLD;;)
  4771.       switch (state = m_getfld (state, name, buf, sizeof buf, fp)) {
  4772.           case FLD:
  4773. ***************
  4774. *** 418,434 ****
  4775.               while (isspace (*dp))
  4776.                   dp++;
  4777.               if (*dp == '"') {
  4778. !                 dp++;
  4779. !                 if (strlen (dp) >= sizeof "us-ascii\""
  4780. !                     && *(bp = dp + sizeof "us-ascii" - 1)=='"')
  4781.                   *bp = NULL;
  4782.               }
  4783.               else
  4784. !                 if (strlen (dp) >= sizeof "us-ascii"
  4785. !                     && isspace (*(bp =
  4786. !                         dp + sizeof "us-ascii" - 1)))
  4787. !                 *bp = NULL;
  4788. !             result = !uleq (dp, "us-ascii");
  4789.               }
  4790.               else
  4791.               if (!(result = !uleq (bp, "text"))) {
  4792. --- 422,440 ----
  4793.               while (isspace (*dp))
  4794.                   dp++;
  4795.               if (*dp == '"') {
  4796. !                 if (bp = index (++dp, '"'))
  4797.                   *bp = NULL;
  4798.               }
  4799.               else
  4800. !                 for (bp = dp; *bp; bp++)
  4801. !                 if (isspace (*bp)) {
  4802. !                     *bp = NULL;
  4803. !                     break;
  4804. !                 }
  4805. !             if ((result = !uleq (dp, chset))
  4806. !                     && uleq (dp, "us-ascii")
  4807. !                     && uleq (chset, "iso-8859-1"))
  4808. !                 result = 0;
  4809.               }
  4810.               else
  4811.               if (!(result = !uleq (bp, "text"))) {
  4812. ***************
  4813. *** 457,463 ****
  4814.               for (dp = bp; istoken (*dp); dp++)
  4815.               continue;
  4816.               *dp = NULL;
  4817. !             result = !uleq (bp, "7bit");
  4818.   
  4819.               free (cp);
  4820.               if (result) {
  4821. --- 463,471 ----
  4822.               for (dp = bp; istoken (*dp); dp++)
  4823.               continue;
  4824.               *dp = NULL;
  4825. !             result = !uleq (bp, "7bit")
  4826. !                 && !uleq (bp, "8bit")
  4827. !                 && !uleq (bp, "binary");
  4828.   
  4829.               free (cp);
  4830.               if (result) {
  4831. *** ../mh-6.8.2/zotnet/mts.h    Wed Aug 25 15:56:08 1993
  4832. --- zotnet/mts.h    Sat Sep  4 12:09:48 1993
  4833. ***************
  4834. *** 1,5 ****
  4835.   /* mts.h - definitions for the mail system */
  4836. ! /* @(#)$Id: mts.h,v 1.3 1992/12/15 00:20:22 jromine Exp $ */
  4837.   
  4838.   
  4839.   /* Local and UUCP Host Name */
  4840. --- 1,5 ----
  4841.   /* mts.h - definitions for the mail system */
  4842. ! /* @(#)$Id: mts.h,v 1.4 1993/09/04 19:09:45 jromine Exp $ */
  4843.   
  4844.   
  4845.   /* Local and UUCP Host Name */
  4846. ***************
  4847. *** 84,89 ****
  4848. --- 84,90 ----
  4849.   
  4850.   extern char *servers;
  4851.   extern char *pophost;
  4852. + extern char *clientname;
  4853.   
  4854.   
  4855.   /* BBoards-specific variables */
  4856. *** ../mh-6.8.2/zotnet/mts/mts.h    Wed Aug 25 15:56:16 1993
  4857. --- zotnet/mts/mts.h    Wed Sep  1 13:55:11 1993
  4858. ***************
  4859. *** 81,86 ****
  4860. --- 81,87 ----
  4861.   
  4862.   /* SMTP/POP stuff */
  4863.   
  4864. + extern char *clientname;
  4865.   extern char *servers;
  4866.   extern char *pophost;
  4867.   
  4868. *** ../mh-6.8.2/zotnet/tws/lexedit.sed    Wed Aug 25 15:56:10 1993
  4869. --- zotnet/tws/lexedit.sed    Mon Oct 25 12:35:11 1993
  4870. ***************
  4871. *** 4,7 ****
  4872.   /^struct yysvf \*yyestate;$/,/^extern struct yysvf yysvec/d
  4873. ! /^# define YYNEWLINE /,/^int nstr;/d
  4874. ! /^while((nstr = yylook()/,/^if(yywrap()) /d
  4875.   /^case -1:$/,/^} return(0); }/c\
  4876. --- 4,7 ----
  4877.   /^struct yysvf \*yyestate;$/,/^extern struct yysvf yysvec/d
  4878. ! /^# define YYNEWLINE /,/^[     ]*int nstr;/d
  4879. ! /^[     ]*while((nstr = yylook()/,/^[     ]*if(yywrap()) /d
  4880.   /^case -1:$/,/^} return(0); }/c\
  4881.